كيف يمكن حذف الصفوف التي تحتوي على خلايا فارغة في قائمة طويلة في إكسل؟
على سبيل المثال، نقوم بنسخ البيانات من صفحة ويب، ونحتاج إلى حذف البيانات غير الصالحة بناءً على الخلايا الفارغة في تحديد العمود. عادةً يمكننا تحديد صف ثم حذفه يدويًا، لكن ذلك سيستغرق وقتًا طويلاً إذا كان هناك عدد كبير جدًّا من الخلايا الفارغة. هنا سأعرض طريقتين لـ حذف الصفوف بسهولة إذا كانت الخلايا فارغة في قائمة طويلة في إكسل.
حذف الصفوف إذا كانت الخلايا فارغة في إكسل باستخدام أمر الانتقال إلى الخاص
حذف الصفوف إذا كانت الخلايا فارغة في إكسل باستخدام ماكرو VBA
حذف الصفوف إذا احتوت الخلايا على قيمة/بيانات معيّنة في قائمة/عمود طويل
حذف الصفوف إذا كانت الخلايا فارغة في إكسل باستخدام أمر الانتقال إلى الخاص
إذا كانت بياناتك موجودة في عمود واحد فقط في إكسل، فيمكنك حذف الصفوف إذا كانت الخلايا فارغة في القائمة/العمود المحدد باستخدام أمر الانتقال إلى الخاص عبر الخطوات التالية:
1. حدد العمود الذي تريد حذف صفوفه إذا كانت خلاياه فارغة، ثم انقر علىالصفحة الرئيسية > بحث واختيار > الانتقال إلى الخاص.


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


الخطوة 4: في مربع حوار الحذف، حدد خانة الاختيارالصف بأكمله، ثم انقر على زرموافق.
الآن تم حذف الصف بالكامل، بما في ذلك جميع الخلايا الفارغة في العمود المحدد.
حذف الصفوف إذا كانت الخلايا فارغة في إكسل باستخدام ماكرو VBA
في هذا القسم، سنزوّدك بكود ماكرو VBA لحذف الصفوف التي تحتوي على خلايا فارغة في إكسل.
1. اضغط معًا على مفاتيحAlt+F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. أدرج وحدة نمطية (Module) بالنقر علىإدراج > وحدة نمطية، ثم الصق ماكرو VBA التالي في الوحدة النمطية.
VBA: حذف الصف بأكمله إذا كانت الخلايا فارغة في عمود
Sub DeleteBlackCell()
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)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeBlanks)
If Err = 0 Then
WorkRng.EntireRow.Delete
End If
End Sub3. اضغط علىF5أو انقر على زرتشغيللتشغيل ماكرو VBA هذا4. في مربع حوار Kutools for Excel، حدد وعيّن العمود الذي تريد حذف الصف بأكمله فيه إذا كانت خلاياه فارغة، ثم انقر على زرموافق.

الآن، سيتم حذف الصفوف التي تحتوي على خلايا فارغة في العمود المحدد دفعةً واحدة، ولكن فقط إذا كانت تلك الخلايا فارغة فعليًّا.
حذف الصفوف إذا احتوت الخلايا على محتوى معيّن في قائمة/عمود طويل
قد تحتاج أحيانًا إلى حذف الصف بأكمله إذا احتوت خلايا عمود معيّن على محتوى محدَّد. في هذه الحالة، يمكنك استخدام أداة «تحديد خلايا محددة» من Kutools لـ Excel لإنجاز هذه المهمة بسهولة في إكسل.
Kutools لـ Excel – مزوَّد بأكثر من 300 أداة أساسية لبرنامج Excel! اجعل مهامك في Excel أسرع، وأسهل، وأكثر كفاءة.حمِّل الآن!
1. حدد العمود الذي إذا احتوت خلاياه على محتوى معيّن، فسيتم حذف الصفوف المرتبطة بها، ثم انقر علىKutools > تحديد > تحديد خلايا محددة.


2. في مربع حوار «تحديد خلايا محددة» الذي يظهر، راجع لقطة الشاشة أعلاه:
(1) حدد خيارالصف بأكملهفي قسمنوع التحديد؛
(2) اختريحتوي علىمن القائمة المنسدلة الأولى في قسمتحديد النوع؛
(3) اكتب المحتوى المطلوب في الحقل التالي.
(4) انقر على زرموافق.
3. بعد ذلك، سيظهر مربع حوار يعرض عدد الصفوف المحددة. انقر على زرموافقلإغلاقه.

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

بعد ذلك، سيتم حذف جميع الصفوف المحددة دفعة واحدة. راجع لقطة الشاشة:

مقالات ذات صلة
كيف تمنع حفظ الملف في إكسل إذا كانت خلية معيّنة فارغة؟
كيف تُبرز الصف إذا احتوت إحدى خلاياه على نص، أو قيمة، أو كانت فارغة في إكسل؟
كيف تتجاهل الحساب (أو الصيغة) في إكسل إذا كانت الخلية فارغة؟
كيف تستخدم دالة IF مع الدوال AND وOR وNOT في إكسل؟
كيف يمكنك عرض رسائل تحذير أو تنبيه عند ترك الخلايا فارغة في إكسل؟
كيف تُدخل أو تُعرض نصًّا أو رسالةً عند فراغ الخلايا في إكسل؟
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل