6 طرق سهلة لإزالة الصفوف الفارغة في Excel (خطوة بخطوة)

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

• إزالة الصفوف الفارغة
• باستخدام عمود مساعد
• باستخدام Kutools خلال 3 ثوانٍ
• يدويًا
• باستخدام VBA
• إزالة الصفوف التي تحتوي على خلية فارغة
• باستخدام ميزة الانتقال إلى الخاص
• في عمود رئيسي باستخدام ميزة التصفية

فيديو: إزالة الصفوف الفارغة

إزالة الصفوف الفارغة

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

• استخدام "الانتقال إلى الخاص" لتحديد الخلايا الفارغة ثم إزالة الصفوف الخاصة بهذه الخلايا الفارغة المحددة.
• استخدام ميزة التصفية لتصفية الخلايا الفارغة في العمود الرئيسي ثم إزالة الصفوف الفارغة في النطاق المُرشح.

ومع ذلك، فإن كلا الطريقتين لديهما القدرة على إزالة صفوف تحتوي على بيانات مهمة بالخطأ كما هو موضح في لقطات الشاشة أدناه.

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

>> إزالة الصفوف الفارغة باستخدام عمود مساعد

الخطوة 1: إضافة عمود مساعد واستخدام دالة COUNTA

1. في أقصى يمين مجموعة البيانات، أضف عمود "المساعد" واستخدم الصيغة التالية في الخلية الأولى من العمود:

   =COUNTA(A2:C2)

   

   ملاحظة: في الصيغة، A2:C2 هو النطاق الذي تريد حساب عدد الخلايا غير الفارغة فيه.
2. ثم اسحب مقبض التعبئة التلقائية لأسفل لملء الصيغة لحساب عدد الخلايا غير الفارغة في كل صف. "0" يشير إلى أن الصف المعني فارغ بالكامل.

   

الخطوة 2: تصفية الصفوف الفارغة باستخدام العمود المساعد

1. انقر فوق أي خلية في العمود المساعد، ثم حدد "بيانات" > "تصفية".

   

2. ثم انقر فوق "سهم التصفية" وقم بتحديد "0" فقط في القائمة الموسعة، ثم انقر "موافق".

   

الآن تم تصفية جميع الصفوف الفارغة.

الخطوة 3: حذف الصفوف الفارغة

حدد الصفوف الفارغة (انقر على رقم الصف واسحب لأسفل لتحديد جميع الصفوف الفارغة)، ثم انقر بزر الماوس الأيمن واختر "حذف الصف" من قائمة السياق (أو يمكنك استخدام الاختصارات "Ctrl" + "-").

الخطوة 4: حدد تصفية في مجموعة الفرز والتصفية لإزالة التصفية المطبقة

النتيجة:

>> إزالة الصفوف الفارغة باستخدام Kutools خلال 3 ثوانٍ

للحصول على طريقة سريعة وسهلة لإزالة الصفوف الفارغة بدقة من تحديدك، فإن أفضل حل هو استخدام ميزة "حذف الصفوف الفارغة" من "Kutools for Excel". إليك الطريقة:

1. حدد النطاق الذي تريد إزالة الصفوف الفارغة منه.
2. انقر "Kutools" > "حذف" > "حذف الصفوف الفارغة" > "في النطاق المحدد".
3. اختر الخيار المطلوب الذي تحتاجه وانقر "موافق" في النافذة المنبثقة.

   

>> إزالة الصفوف الفارغة يدويًا

إذا كان هناك عدد قليل من الصفوف الفارغة لإزالتها، يمكنك أيضًا إزالتها يدويًا.

الخطوة 1: تحديد الصفوف الفارغة

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

الخطوة 2: حذف الصفوف الفارغة

بعد تحديد الصفوف الفارغة، انقر بزر الماوس الأيمن واختر "حذف" من قائمة السياق (أو يمكنك استخدام الاختصارات "Ctrl" + "-").

النتيجة:

>> إزالة الصفوف الفارغة باستخدام VBA

إذا كنت مهتمًا بـ VBA، يقدم لك هذا البرنامج التعليمي كودين VBA لإزالة الصفوف الفارغة في التحديد وفي ورقة العمل النشطة.

الخطوة 1: نسخ VBA إلى نافذة Microsoft Visual Basic for Applications

1. نشط الورقة التي تريد إزالة الصفوف الفارغة منها، ثم اضغط على مفاتيح "Alt" + "F11".

   

2. في النافذة المنبثقة، انقر "إدراج" > "وحدة".

3. ثم انسخ والصق أحد الأكواد أدناه في الوحدة الجديدة الفارغة.

   الكود 1: إزالة الصفوف الفارغة من ورقة العمل النشطة

   Sub RemoveBlankRows()
   'UpdatebyExtendoffice
       Dim wsheet As Worksheet
       Dim lastRow As Long
       Dim i As Long
       
       ' Set the worksheet variable to the active sheet
       Set wsheet = ActiveSheet
       
       ' Get the last row of data in the worksheet
       lastRow = wsheet.Cells(wsheet.Rows.Count, 1).End(xlUp).Row
       
       ' Loop through each row in reverse order
       For i = lastRow To 1 Step -1
           ' Check if the entire row is blank
           If WorksheetFunction.CountA(wsheet.Rows(i)) = 0 Then
               ' If the row is blank, delete it
               wsheet.Rows(i).Delete
           End If
       Next i
   End Sub
   

   الكود 2: إزالة الصفوف الفارغة من النطاق المحدد

   Sub RemoveBlankRowsInRange()
   'UpdatebyExtendoffice
   Dim sRange As Range
   Dim row As Range
   ' Prompt the user to select a range
   On Error Resume Next
   Set sRange = Application.InputBox(prompt:="Select a range", Title:="Kutools for Excel", Type:=8)
   ' Check if a range is selected
   If Not sRange Is Nothing Then
   ' Loop through each row in reverse order
   For Each row In sRange.Rows
   ' Check if the entire row is blank
   If WorksheetFunction.CountA(row) = 0 Then
   ' If the row is blank, delete it
   row.Delete
   End If
   Next row
   Else
   MsgBox "No range selected. Please select a range and run the macro again.", vbExclamation
   End If
   End Sub
   

   

الخطوة 2: تشغيل الكود وحذف الصفوف الفارغة

انقر على "زر التشغيل" أو اضغط على مفتاح "F5" لتشغيل الكود.

• إذا استخدمت الكود 1 لإزالة الصفوف الفارغة في الورقة النشطة، بعد تشغيل الكود، سيتم إزالة جميع الصفوف الفارغة في الورقة.

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

  

النتائج:

الكود 1: إزالة الصفوف الفارغة في الورقة النشطة

الكود 2: إزالة الصفوف الفارغة في النطاق المحدد

إزالة الصفوف التي تحتوي على خلايا فارغة

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

>> إزالة الصفوف التي تحتوي على خلايا فارغة باستخدام الانتقال إلى الخاص

ميزة الانتقال إلى الخاص تُوصى بها على نطاق واسع لإزالة الصفوف الفارغة. يمكن أن تكون أداة مفيدة عندما تحتاج إلى إزالة الصفوف التي تحتوي على خلية فارغة واحدة على الأقل.

الخطوة 1: تحديد الخلايا الفارغة في النطاق

1. حدد النطاق الذي تريد حذف الصفوف الفارغة منه، ثم حدد "الرئيسية" > "بحث وتحديد" > "الانتقال إلى الخاص".

   

   أو يمكنك الضغط مباشرة على مفتاح "F5" لتفعيل نافذة "الانتقال إلى"، ثم انقر على زر "خاص" للتبديل إلى نافذة "الانتقال إلى الخاص".
2. في نافذة "الانتقال إلى الخاص"، اختر خيار "فراغات" وانقر "موافق".

   

الآن تم تحديد جميع الخلايا الفارغة في النطاق المحدد.

الخطوة 2: حذف الصفوف التي تحتوي على خلايا فارغة

1. انقر بزر الماوس الأيمن على أي خلية محددة، واختر "حذف" من قائمة السياق (أو يمكنك استخدام الاختصارات "Ctrl" + "-").

   

2. في نافذة "حذف"، اختر خيار "الصف بأكمله" وانقر "موافق".

   

النتيجة:

>> إزالة الصفوف التي تحتوي على خلايا فارغة في عمود رئيسي باستخدام ميزة التصفية

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

الخطوة 1: تصفية الخلايا الفارغة في العمود الرئيسي

1. حدد مجموعة البيانات، انقر على علامة التبويب "بيانات"، انتقل إلى مجموعة "الفرز والتصفية"، انقر على "تصفية" لتطبيق التصفية على مجموعة البيانات.

   

2. انقر على "سهم التصفية" للعمود الرئيسي الذي تريد استخدامه لإزالة الصفوف. في هذا المثال، العمود "ID" هو العمود الرئيسي، وتحقق فقط من "فراغات" في القائمة الموسعة. انقر "موافق".

   

الآن تم تصفية جميع الخلايا الفارغة في العمود الرئيسي.

الخطوة 2: حذف الصفوف

حدد الصفوف المتبقية (انقر على رقم الصف واسحب لأسفل لتحديد جميع الصفوف الفارغة)، ثم انقر بزر الماوس الأيمن واختر "حذف الصف" من قائمة السياق (أو يمكنك استخدام الاختصارات "Ctrl" + "-"). وانقر "موافق" في النافذة المنبثقة.

الخطوة 3: حدد تصفية في مجموعة الفرز والتصفية لإزالة التصفية المطبقة

النتيجة: