كيفية تغليط السطر الأول أو الكلمة الأولى فقط في الخلية في Excel؟

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

تغليط السطر الأول فقط في الخلية باستخدام كود VBA

تغليط الكلمة الأولى فقط في الخلية باستخدام كود VBA

تغليط الكلمة الأولى أو السطر الأول فقط في الخلية باستخدام Kutools AI

تغليط السطر الأول فقط في الخلية باستخدام كود VBA

الكود التالي لـ VBA يمكن أن يساعدك بسرعة في تغليط السطر الأول فقط في الخلايا المحددة. الرجاء اتباع الخطوات التالية:

1. اضغط على مفتاحي "Alt" + "F11" معًا لفتح نافذة "Microsoft Visual Basic for Applications".

2. في نافذة "Microsoft Visual Basic for Applications"، انقر فوق "إدراج" > "وحدة". ثم قم بنسخ ولصق الكود التالي لـ VBA في نافذة الوحدة.

كود VBA: تغليط السطر الأول فقط في الخلايا

Option Explicit
Sub BoldFirstLine()
Dim xRng As Range, xCell As Range
Dim xFirstRow As String
On Error Resume Next
Set xRng = Application.InputBox("Please select range：", "Kutools for", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
On Error Resume Next
For Each xCell In xRng
    With xCell
        .Characters(1, InStr(.Value, Chr(10))).Font.Bold = True
    End With
Next
End Sub

3. اضغط على مفتاح "F5" لتشغيل الكود. ستظهر نافذة منبثقة بعنوان "Kutools لـ Excel"، يرجى تحديد النطاق الذي تريد تغليط السطر الأول فيه، ثم انقر فوق زر "موافق".

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

تغليط الكلمة الأولى فقط في الخلية باستخدام كود VBA

كما هو موضح في لقطة الشاشة أدناه، قد تحتاج أحيانًا إلى تغليط الكلمة الأولى فقط في النطاق A2:A4 في Excel. يمكنك تحقيق ذلك خطوة بخطوة كما يلي:

1. اضغط على مفتاحي "Alt" + "F11" معًا لفتح نافذة "Microsoft Visual Basic for Applications".

2. في نافذة "Microsoft Visual Basic for Applications"، انقر فوق "إدراج" > "وحدة". ثم قم بنسخ ولصق الكود التالي لـ VBA في نافذة الوحدة.

كود VBA: تغليط الكلمة الأولى فقط في الخلايا

Sub boldtext()
Dim xRng As Range, xCell As Range
On Error Resume Next
Set xRng = Application.InputBox("Please select range：", "Kutools fro Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
On Error Resume Next
For Each xCell In xRng
  If xCell.Value <> "" Then
    xCell.Characters(1, InStr(1, xCell.Value, " ") - 1).Font.Bold = True
  End If
Next
End Sub

3. اضغط على مفتاح "F5" لتشغيل الكود. في نافذة "Kutools لـ Excel" المنبثقة، حدد النطاق الذي تريد تغليط الكلمة الأولى فيه، ثم اضغط على زر "موافق". شاهد لقطة الشاشة:

بعد ذلك، يمكنك رؤية جميع الكلمات الأولى للخلايا المحددة تصبح غليظة فوراً كما هو موضح في لقطة الشاشة أدناه.

تغليط الكلمة الأولى أو السطر الأول فقط في الخلية باستخدام Kutools AI

إذا وجدت أن كود VBA معقد للغاية، يمكنك استخدام "Kutools AI" للحصول على حل أبسط وأكثر كفاءة. باستخدام Kutools لـ Excel AI، يمكنك أتمتة هذه المهمة وتطبيق التنسيق بشكل متسق بنقرات قليلة. سواء كنت تعمل مع مجموعات بيانات صغيرة أو جداول بيانات كبيرة، فإن "Kutools AI" يوفر الوقت ويضمن نتيجة متقنة.

بعد تثبيت Kutools لـ Excel، يرجى النقر فوق "Kutools" > "مساعد الذكاء الاصطناعي" لفتح لوحة "مساعد KUTOOLS AI".

1. حدد نطاق البيانات الذي تريد إزالة النص داخل الأقواس منه؛
2. ثم، اكتب الطلب في مربع الدردشة: مثل:
   ● تغليط الكلمة الأولى لكل خلية:
   تغليط الكلمة الأولى فقط في النطاق المحدد
   ● تغليط السطر الأول لكل خلية
   تغليط السطر الأول فقط في كل خلية ضمن النطاق المحدد
3. ومن ثم، اضغط على مفتاح "Enter" أو انقر على زر "إرسال". سيقوم Kutools AI بتحليل السؤال، وبعد الانتهاء، يرجى النقر على زر "تنفيذ" للحصول على النتيجة.

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

المقالة ذات الصلة:

• كيفية حذف جميع الأسطر الفارغة أو السطر الأول فقط في الخلية في Excel؟