KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

كيف يمكنك جعل جزء معيّن من النص عريضًا عند ربط عمودين في Excel؟

المؤلفXiaoyangتاريخ التعديل

عند العمل مع البيانات في Excel، غالبًا ما تحتاج إلى دمج المعلومات من عمودين في خلية واحدة لتحسين القراءة أو لإعداد التقارير. على سبيل المثال، قد ترغب في عرض أسماء العملاء مع مواقعهم، أو دمج أسماء المنتجات وأكوادها. وعادةً ما تحقّق ذلك باستخدام صيغ مثلCONCATENATE أو&. لكن تظهر هنا مشكلة شائعة: بعد ربط قيم الخلايا، يعامل Excel النص المدمج كسلسلة نصية بسيطة ولا يدعم التنسيق الجزئي بشكلٍ أصلي. وهذا يعني أنه لا يمكنك جعل جزء من النص المدمج عريضًا تلقائيًّا عبر الصيغ—فأي تنسيق تُطبّقه سيؤثر على الخلية بأكملها فقط. وقد يكون هذا القيد محبطًا عندما تريد التأكيد على جزء معيّن، مثل جعل الكلمة الأولى عريضة. في هذا البرنامج التعليمي، سنوضح لك كيفية تحقيق التنسيق العريض الجزئي عند دمج عمودين في Excel، وسنستعرض سيناريوهات عملية لذلك، بالإضافة إلى الحلول البديلة.

جعل جزء من النص عريضًا عند ربط عمودين باستخدام كود VBA

بديل: ربط القيم باستخدام الصيغ (مع نصائح التنسيق)


جعل جزء من النص عريضًا عند ربط عمودين باستخدام كود VBA

تخيّل أن لديك عمودين: الأول يحتوي على الاسم الأول، والثاني على الاسم الأخير. تريد دمجهما في عمود جديد، مع جعل الاسم الأول (من العمود الأول) **عريضًا**، بينما يبقى الاسم الأخير بخط عادي—تمامًا كما في التنسيقات الاحترافية. تُظهر لقطة الشاشة أدناه هذا الهدف، حيث يبرز الناتج المدمج بجزئه الأول بخط عريض:

لقطة شاشة تُظهر الأعمدة الأصلية والبيانات المدمجة، مع وجود بعض النصوص بخط عريض

هذا الأسلوب مثالي بشكل خاص للقوائم التي ترغب فيها في تسليط الضوء على معلومة رئيسية (مثل اسم منتج أو رمزه) ضمن وصف أطول. وعلى الرغم من أن صيغ Excel الاعتيادية لا تدعم تطبيق تنسيق جزئي داخل الخلية، يمكنك استخدام ماكرو VBA لأتمتة عملية الدمج والتنسيق بسلاسة. وهو خيار مناسب للمستخدمين المتمرسين على الماكروات البسيطة والراغبين في حل قابل للتكرار لتنسيق النتائج المدمجة جزئيًا. يُرجى ملاحظة أن تشغيل VBA يتطلب تمكين الماكروات، ولا يمكن التراجع عن الإجراء باستخدام Ctrl+Z، لذا تأكد من حفظ عملك قبل البدء.

1. اضغط مع الاستمرار على مفتاحَيALT + F11 لفتح نافذةMicrosoft Visual Basic for Applications. إذا كانت هذه هي المرة الأولى التي تستخدم فيها VBA، فتأكد من تمكين علامة التبويب «المطوّر» في Excel (ملف > خيارات > تخصيص الشريط > فعّل خيار «المطوّر»).

2. في نافذة VBA، انقر علىإدراج > وحدة نمطية، مما سيُنشئ وحدة نمطية جديدة. ثم الصق الكود التالي في منطقة الكود الخاصة بالوحدة النمطية. سيقوم هذا الماكرو بدمج قيمتي العمودين في كل صف، مع جعل القيمة الأولى عريضة في الناتج:

كود VBA: جعل جزء من النص عريضًا عند ربط عمودين:

Sub JoinCellsWithBoldFormatForFirstWord()
'Updateby Extendoffice 20160725
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim I As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
LInput:
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Areas.Count > 1 Then
        MsgBox "does not support multiple selections", vbInformation, "Kutools for Excel"
        GoTo LInput
    End If
    If xRg.Columns.Count <> 2 Then
        MsgBox "only two columns in the selection", vbInformation, "Kutools for Excel"
        GoTo LInput
    End If
    Set xRg = xRg.Resize(xRg.Rows, 3)
    On Error Resume Next
    For Each xCell In xRg.Columns(3).Cells
        xCell = xRg.Cells(xCell.Row, 1) & " " & xRg.Cells(xCell.Row, 2)
        xCell.Font.Bold = False
        xCell.Characters(1, Len(xRg.Cells(xCell.Row, 1))).Font.FontStyle = "Bold"
    Next
End Sub

3. في القائمة، اضغط علىF5 لتنفيذ الماكرو. ستظهر نافذة مطالبة تتيح لك تحديد نطاق الخلايا الذي تريد ربطه وتنسيقه. يمكنك استخدام الماوس للتحديد أو كتابة النطاق مباشرةً، مثلA1:B10. انظر شاشة التحديد أدناه:

نصائح قبل التشغيل:

  • تأكد من أن نطاق التحديد يشمل العمودين اللذين ترغب في دمجهما.
  • سيُخرِج هذا الماكرو النتائج بجانب التحديد الأصلي، لذا تأكد من أن خلايا الوجهة فارغة لتجنب الكتابة فوق بياناتك.
  • إذا كان هناك أي خلايا مدمجة أو صيغ داخل نطاق التحديد، فافصل الخلايا المدمجة أو احذف الصيغ، إذ قد تؤدي إلى أخطاء.

لقطة شاشة لتحديد الأعمدة بعد تشغيل الكود

إذا حددتَ النطاق الخطأ عن طريق الخطأ، فانقر على «إلغاء» وأعد تشغيل الماكرو.

4. انقر علىموافقفي المطالبة. سيقوم الماكرو بمعالجة البيانات، وسيدمج لكل صف ضمن النطاق الذي حددته القيمتين من العمودين في خلية جديدة على اليمين. وستُنسَّق القيمة الأولى في كل نتيجة تلقائيًّا بالعريض، كما هو موضح أدناه:

لقطة شاشة تُظهر النتائج المدمجة

يمكنك الآن استخدام هذه النتائج لإعداد تقارير إضافية أو طباعتها أو تصديرها. إذا لم تتطابق النتائج مع التوقعات، فراجع مجددًا تحديدك وتأكد من أن كل صف يحتوي على القيم المتوقعة في كلا العمودين الأصليين.

المزايا:

  • يمكّنك من تطبيق تنسيق جزئي—مثل العريض أو أي تعديلات أخرى على النمط—أثناء الربط، وهو ما لا تستطيع الصيغ القياسية تحقيقه.
  • يؤتمت تنفيذ المهام المتكررة للقوائم الكبيرة.

العيوب: يتطلب تشغيل الماكروات، التي قد تكون مقيدة في بعض البيئات.

إذا واجهت مشكلات (مثل عدم وجود مخرجات أو أخطاء أو عدم تطبيق التنسيق):

  • تحقق من إعدادات الأمان للتأكد من تمكين الماكروات (ملف > خيارات > مركز الثقة > إعدادات مركز الثقة > إعدادات الماكرو).[ [TN_49_END]]
  • تأكد من خلو منطقة الوجهة من أوراق محمية أو مدمجة.
  • إذا تم تحديد النطاق بشكل غير صحيح، فأعد تشغيل الماكرو وحدد عمودين متجاورين فقط.

بديل: ربط القيم باستخدام الصيغ (مع نصائح التنسيق)

إذا كنت لا ترغب في استخدام VBA، فبإمكانك الاعتماد على صيغ Excel مثلCONCATENATE وTEXTJOIN، أو حتى علامة العطف ()&) لدمج القيم من عمودين بسهولة! صحيح أن هذه الصيغ لا تدعم تطبيق التنسيق العريض على جزءٍ من الناتج، لكنك تستطيع دمج الأعمدة بسرعة ثم تنسيق النص يدويًّا في كل خلية حسب احتياجاتك.

لربط عمودين (A وB) في Excel:

1. انقر على الخلية الأولى في عمود الوجهة (مثلًا، C2)، ثم أدخل هذه الصيغة:

=A2 & " " & B2

2. اضغط على Enter للتأكيد والحصول على الناتج المدمج. اسحب مقبض التعبئة لأسفل لتطبيق الصيغة على الصفوف الأخرى حسب الحاجة. إذا كنت بحاجة إلى جعل جزء من النص عريضًا يدويًّا في نتيجة الصيغة، فانسخ خلايا النتيجة والصقها كقيم في نفس الموقع أولًا. بعد ذلك، انقر نقرًا مزدوجًا على الخلية، وحدد الجزء المطلوب، ثم اضغط علىCtrl + Bأو استخدم زر «عريض» في علامة التبويب «الصفحة الرئيسية».

3. إذا أردت استخدام فواصل مختلفة أو تنسيقًا مخصصًا، فعدّل الصيغة حسب احتياجاتك. على سبيل المثال، لإضافة فاصلة بين النصوص:

=A2 & ", " & B2

المزايا:

  • بسيط ولا يتطلب ماكروات أو إعدادات خاصة.
  • مرن ويتيح لك دمج أي عدد من الخلايا أو إضافة فواصل مخصصة.

العيوب:

  • يجب تطبيق التنسيق الجزئي (مثل جعل جزء من النص عريضًا) يدويًّا وليس ديناميكيًّا—فكل تحديث للقيم يستلزم إعادة تنفيذ التنسيق.
  • لا يُطبَّق بشكل جيد على مجموعات البيانات الكبيرة جدًّا عندما يتطلب الأمر تنسيقًا يدويًّا.

للحصول على أفضل النتائج عند الحاجة إلى التنسيق الجزئي، استخدمه مع مجموعات البيانات الصغيرة أو الجداول الجاهزة للعرض بعد الانتهاء من إدخال البيانات.

باختصار، يُمكّنك استخدام VBA من تطبيق تنسيق جزئي على النتائج المدمجة في المشاريع الكبيرة أو المؤتمتة، بينما تظل الصيغ الخيار الأفضل للدمج الأساسي بفضل سهولتها في الاستخدام اليومي. إذا كنت تبحث عن حلول تعتمد على الصيغ فقط دون أي مخاوف تتعلق بالتنسيق، فارجع إلى تقنيات ربط Excel القياسية. واحرص دائمًا على عمل نسخة احتياطية من ملفك قبل استخدام الماكروات، وتأكد مجددًا من تحديداتك قبل تشغيل أي مهمة مؤتمتة.


أفضل أدوات الإنتاجية لمكتبتك

🤖KUTOOLS AI مساعد: ثوّر تحليل البيانات استنادًا إلى:التنفيذ الذكي   |  إنشاء الكود|  إنشاء الصيغ المخصصة  |  تحليل البيانات وإنشاء المخططات البيانية|  استدعاء الوظائف المحسنة
الميزات الشائعة:البحث، التمييز أو وضع علامة على المكررات   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |  التقريب بدون استخدام الصيغة...
بحث متقدم:VLookup متعدد المعايير  |  VLookup متعدد القيم  |   VLookup عبر أوراق متعددة   |   مطابقة غامضة....
قائمة منسدلة متقدمة:إنشاء قائمة منسدلة بسرعة   |  قائمة منسدلة تابعة   |  قائمة منسدلة متعددة الاختيار....
مدير الأعمدة:إضافة عدد محدد من الأعمدة|نقل الأعمدة|تبديل حالة ظهور الأعمدة المخفية|مقارنة النطاقات والأعمدة...
ميزات مميزة:التركيز على الشبكة   |  عرض التصميم   |شريط الصيغ المحسن   | مدير الدفتر والورقة   |  مكتبة الموارد(نص تلقائي)|  أداة اختيار التاريخ   |  تجميع ورقات العمل  |  تشفير/فك تشفير الخلايا   | إرسال رسائل البريد الإلكتروني حسب القائمة   |  مرشح متقدم   |   تصفية خاصة(تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
أفضل 15 مجموعات الأدوات:12 أدواتالنصوص(إضافة نص،حذف الأحرف المحددة، ...)|   50+أنواعالمخططات البيانية(مخطط جانت، ...)|   40+ صيغعملية(حساب العمر بناءً على تاريخ الميلاد، ...)|   19 أدواتالإدراج(إدراج رمز QR،إدراج صورة من المسار، ...)|   12 أدواتالتحويل(تحويل إلى كلمات،تحويل العملة، ...)|   7 أدواتدمج وتقسيم(دمج متقدم للصفوف،تقسيم الخلايا، ...)|... وأكثر من ذلك
استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...


يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير

  • تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
  • افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!

جميع الإضافات من Kutools في برنامج تثبيت واحد!

Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.

ExcelWordOutlookTabsPowerPoint
  • حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
  • برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
  • يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
  • تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
  • أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل