كيفية ملء الخلايا الفارغة بشرطة في Excel؟

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

املأ الخلايا الفارغة بشرطات باستخدام انتقل إلى خاص

املأ الخلايا الفارغة بشرطات باستخدام وظيفة البحث والاستبدال

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

املأ الخلايا الفارغة بشرطات باستخدام Kutools لـ Excel

املأ الخلايا الفارغة بشرطات باستخدام انتقل إلى خاص

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

1. حدد النطاق الذي تحتاج إلى ملء الفراغات فيه بشرطات.

2. ثم انقر فوق الصفحة الرئيسية > البحث والتحديد > انتقل إلى خاص، في مربع الحوار انتقل إلى خاص، قم بتحديد خيار فراغات، انظر لقطات الشاشة:

3. ثم انقر فوق موافق، وستتم تعبئة جميع الخلايا الفارغة كما هو موضح في لقطة الشاشة التالية:

4. وبعد ذلك أدخل الشرطة – في الخلية واضغط معًا على مفاتيح Ctrl + Enter، سيتم ملء جميع الخلايا الفارغة بالشرطات في نفس الوقت، انظر لقطة الشاشة:

املأ الخلايا الفارغة بشرطات باستخدام وظيفة البحث والاستبدال

في Excel، يمكن لوظيفة البحث والاستبدال أيضًا مساعدتك.

1. حدد نطاق البيانات الذي تريد استخدامه، واضغط على مفاتيح Ctrl + H لفتح مربع الحوار البحث والاستبدال، انظر لقطة الشاشة:

2. في مربع الحوار البحث والاستبدال، في مربع النص البحث عن لا تقم بإدخال أي شيء واتركه فارغًا، وفي مربع النص استبدال بـ، اكتب رمز الشرطة، انظر لقطة الشاشة:

3. وبعد ذلك انقر فوق زر استبدال الكل لاستبدال الفراغات بشرطات، ثم سيظهر مربع حوار يذكرك بعدد الخلايا التي تم استبدالها. انظر لقطة الشاشة:

4. ثم انقر فوق موافق وأغلق مربع الحوار البحث والاستبدال.

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

الكود التالي لـ VBA يمكنه أيضًا مساعدتك في ملء الخلايا الفارغة بشرطات.

1. اضغط باستمرار على مفاتيح ALT + F11، وسيفتح نافذة Microsoft Visual Basic for Applications.

2. انقر فوق إدراج > وحدة، والصق الكود التالي في نافذة الوحدة.

كود VBA: ملء الخلايا الفارغة بشرطات

Sub ChangeBlank()
'Update by Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    If Rng.Value = "" Then
        Rng.Value = "-"
    End If
    Rng.HorizontalAlignment = xlCenter
Next
End Sub

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

4. وبعد ذلك انقر فوق موافق، سيتم ملء جميع الخلايا الفارغة بالشرطات فورًا.

املأ الخلايا الفارغة بشرطات باستخدام Kutools لـ Excel

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

بعد تنزيل وتثبيت Kutools لـ Excel، الرجاء القيام بما يلي:

1. حدد النطاق الذي تريد ملء الفراغات فيه بشرطات.

2. انقر فوق Kutools > إدراج > ملء الخلايا الفارغة، انظر لقطة الشاشة:

3. في مربع الحوار ملء الخلايا الفارغة، حدد قيمة ثابتة تحت قسم الملء بـ، وأدخل الشرطة (-) في مربع النص القيم المملوءة، انظر لقطة الشاشة:

4. وبعد ذلك انقر فوق موافق أو تطبيق، سيتم ملء جميع الخلايا الفارغة بالشرطات في النطاق المحدد.

لمعرفة المزيد من التفاصيل حول ميزة ملء الخلايا الفارغة.

باستخدام أدوات ملء الخلايا الفارغة هذه، يمكنك أيضًا القيام بالمهمات التالية:

كيفية ملء الخلايا الفارغة بـ 0 أو أي قيمة محددة أخرى في Excel؟

كيفية ملء الخلايا الفارغة بالقيمة الموجودة أعلاها في Excel؟