كيفية تصفية قائمة وحذف بقية الصفوف المخفية أو المرئية في إكسيل؟
بالنسبة إلى القائمة المصفاة ، قد تحتاج إلى حذف الصفوف المخفية أو المرئية من أجل الاحتفاظ بالبيانات المفيدة فقط. في هذه المقالة ، سوف نعرض لك طرق حذف باقي الصفوف المخفية أو المرئية من قائمة تمت تصفيتها في Excel.
احذف الصفوف المخفية في ورقة العمل النشطة برمز VBA
احذف الصفوف المرئية من القائمة المصفاة مع تحديد جميع الخلايا المرئية
احذف بسهولة الصفوف المخفية أو المرئية من القائمة المصفاة باستخدام Kutools for Excel
احذف الصفوف المخفية في ورقة العمل النشطة برمز VBA
سيُظهر لك هذا القسم رمز VBA لحذف الصفوف المخفية في الورقة النشطة. الرجاء القيام بما يلي.
1. قم بتنشيط ورقة العمل التي تحتاجها لحذف الصفوف المخفية ، اضغط قديم + F11 مفاتيح في نفس الوقت لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. في نافذة ميكروسوفت فيسوال باسيك للتطبيقات ، انقر فوق إدراج > وحدة. ثم انسخ والصق رمز فبا أدناه في نافذة الوحدة النمطية.
كود فبا: حذف الصفوف المخفية
Sub RemoveHiddenRows()
Dim xRow As Range
Dim xRg As Range
Dim xRows As Range
On Error Resume Next
Set xRows = Intersect(ActiveSheet.Range("A:A").EntireRow, ActiveSheet.UsedRange)
If xRows Is Nothing Then Exit Sub
For Each xRow In xRows.Columns(1).Cells
If xRow.EntireRow.Hidden Then
If xRg Is Nothing Then
Set xRg = xRow
Else
Set xRg = Union(xRg, xRow)
End If
End If
Next
If Not xRg Is Nothing Then
MsgBox xRg.Count & " hidden rows have been deleted", , "Kutools for Excel"
xRg.EntireRow.Delete
Else
MsgBox "No hidden rows found", , "Kutools for Excel"
End If
End Sub
3. اضغط على F5 مفتاح لتشغيل الكود. إذا كانت هناك صفوف مخفية في الورقة النشطة ، فبعد تشغيل الكود ، سيظهر مربع حوار يخبرك بعدد الصفوف المخفية التي تم حذفها. انقر على OK زر لحذف الصفوف المخفية. انظر لقطة الشاشة:
خلاف ذلك ، سوف تحصل على مربع الحوار التالي بعد تشغيل الكود.
ملاحظات: لا يمكن لرمز VBA أعلاه حذف الصفوف المخفية من القائمة المصفاة فحسب ، بل يمكنه أيضًا حذف الصفوف المخفية التي أخفيتها يدويًا من قبل.
حذف الصفوف المرئية من القائمة المصفاة مع تحديد جميع الخلايا المرئية ميزة
لحذف الصفوف المرئية من القائمة المصفاة ، يرجى القيام بما يلي.
1. حدد جميع الصفوف التي تمت تصفيتها ، واضغط على F5 مفتاح لفتح إذهب إلى مربع الحوار ، ثم انقر فوق ملصقات خاصة زر. انظر لقطة الشاشة:
2. في ال انتقل إلى خاص مربع الحوار، والتحقق من الخلايا المرئية فقط الخيار ، ثم انقر فوق OK .
3. الآن تم تحديد جميع الصفوف المرئية ، انقر بزر الماوس الأيمن فوق التحديد ، ثم انقر فوق حذف الصفوف.
حتى الآن ، يتم حذف جميع الصفوف المرئية من القائمة المصفاة.
احذف بسهولة الصفوف المخفية أو المرئية من القائمة المصفاة باستخدام Kutools for Excel
قد لا تكون الطريقتان المذكورتان أعلاه هي الحلول المرغوبة للعديد من مستخدمي Excel ، وهنا نقدم لك أداة مفيدة. مع حذف الصفوف والأعمدة المخفية (المرئية) فائدة كوتولس ل إكسيل، يمكنك بسهولة حذف الصفوف المخفية في النطاق / الأوراق المحددة أو الورقة النشطة أو جميع أوراق العمل في Excel.
قبل التطبيق كوتولس ل إكسيلالرجاء قم بتنزيله وتثبيته أولاً.
1. إذا كنت تريد فقط حذف الصفوف المخفية أو المرئية من قائمة تمت تصفيتها ، فيرجى تحديد النطاق الذي تمت تصفيته يدويًا ، ثم النقر فوق كوتولس > حذف > حذف الصفوف والأعمدة المخفية (المرئية). انظر لقطة الشاشة:
2. في ال حذف الصفوف والعمود المخفي (المرئي) مربع الحوار ، والحفاظ على في النطاق المحدد المحدد في إنظر في القائمة المنسدلة (يمكنك تحديد خيارات أخرى حسب حاجتك) ، تحقق من الصفوف الخيار في نوع الحذف القسم ، وفي النوع التفصيلي القسم ، تحقق صفوف مرئية or الصفوف المخفية خيار ما تحتاجه. وأخيرًا انقر فوق ملف OK .
3. ثم ينبثق مربع حوار لإخبارك بعدد الصفوف التي تم حذفها ، يرجى النقر فوق OK .
إذا كنت ترغب في الحصول على نسخة تجريبية مجانية (30 يومًا) من هذه الأداة المساعدة ، الرجاء الضغط لتنزيلهثم انتقل لتطبيق العملية حسب الخطوات المذكورة أعلاه.
احذف الصفوف المخفية أو المرئية من القائمة التي تمت تصفيتها باستخدام Kutools for Excel
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!