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

• إزالة الصفوف الفارغة
• بواسطة عمود مساعد
• بواسطة Kutools في 3 ثواني
• يدويا
• باستخدام VBA
• إزالة الصفوف التي تحتوي على خلية (خلايا) فارغة
• بواسطة Go To Special feature
• في عمود مفتاح بواسطة ميزة التصفية

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

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

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

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

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

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

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

الخطوة 1: أضف عمودًا مساعدًا واستخدم وظيفة COUNTA

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

   =COUNTA(A2:C2)

   

   ملاحظات: في الصيغة ، A2: C2 هو النطاق الذي تريده لحساب الخلايا غير الفارغة.



2. ثم اسحب مقبض التعبئة التلقائية لأسفل لتعبئة الصيغة لحساب عدد الخلايا غير الفارغة في كل صف. "0" يشير إلى أن الصف النسبي فارغ تمامًا.

   

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

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

   

2. ثم انقر فوق مرشح السهم وفقط تحقق 0 في القائمة الموسعة ، وانقر فوق OK.

   

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

   

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

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

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

النتيجة:

>> إزالة الصفوف الفارغة بواسطة Kutools في 3 ثواني

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

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

   

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

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

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

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

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

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

النتيجة:

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

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

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

1. قم بتنشيط الورقة التي تريد إزالة الصفوف الفارغة منها ، ثم اضغط على قديم + 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 لإزالة الصفوف الفارغة من التحديد ، فبعد تشغيل الرمز ، ينبثق مربع حوار ، حدد النطاق الذي تريد إزالة الصفوف الفارغة منه في مربع الحوار ، ثم انقر فوق OK.

  

النتائج:

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

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

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

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

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

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

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

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

   

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

2. في مجلة انتقل إلى خاص الحوار، اختر الفراغات الخيار وانقر OK.

   

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

   

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

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

   

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

   

النتيجة:

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

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

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

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

   

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

   

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

   

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

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

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

النتيجة: