نصيحة: اللغات الأخرى مترجمة من قبل Google. يمكنك زيارة English نسخة من هذا الرابط.
تسجيل الدخول
x
or
x
x
التسجيل
x

or

كيفية إخفاء صفوف أو أعمدة فارغة متعددة في إكسيل مرة واحدة في إكسيل؟

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

إخفاء بسرعة عدة صفوف أو أعمدة فارغة مع التعليمات البرمجية فبا

حذف بسرعة عدة صفوف أو أعمدة فارغة مع كوتولس ل إكسيل


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


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

1. اضغط باستمرار ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

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

رمز فبا: إخفاء صفوف فارغة متعددة في ورقة عمل

Sub HideEmpties()
'Updateby Extendoffice 20160725
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim I As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    On Error Resume Next
    For I = 1 To xRg.Row + xRg.Rows.Count
        If Application.WorksheetFunction.CountA(xRg.Rows(I)) = 0 Then
            xRg.Rows(I).EntireRow.Hidden = True
        End If
    Next
End Sub

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

دوك إخفاء الصفوف فارغة شنومكس

4. ثم انقر فوق OK زر، يتم إخفاء الصفوف فارغة في آن واحد، انظر قطة:

دوك إخفاء الصفوف فارغة شنومكس

ملاحظة:: لإخفاء أعمدة فارغة متعددة، يرجى تطبيق شفرة فبا التالية:

رمز فبا: إخفاء أعمدة فارغة متعددة في ورقة عمل

Sub HideEmpties()
'Updateby Extendoffice 20160725
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim I As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    On Error Resume Next
    For I = 1 To xRg.Column + xRg.Columns.Count
        If Application.WorksheetFunction.CountA(xRg.Columns(I)) = 0 Then
            xRg.Columns(I).EntireColumn.Hidden = True
        End If
    Next
End Sub

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

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

كوتولس ل إكسيل : مع أكثر من شنومكس مفيد اكسل الإضافية، مجانا في محاولة مع عدم وجود قيود في أيام شنومك.

بعد تثبيت كوتولس ل إكسيل، يرجى القيام بما يلي:

1. حدد نطاق البيانات الذي تريد حذف الصفوف أو الأعمدة الفارغة، ثم انقر فوق Kutools > حذف > حذف مخفي (مرئي) الصفوف والأعمدة، انظر الصورة:

دوك إخفاء الصفوف فارغة شنومكس

2. في حذف مخفي (مرئي) الصفوف والأعمدة مربع الحوار، حدد في النطاق المحدد in إنظر في (يمكنك أيضا اختيار خيار آخر في هذه القائمة المنسدلة ما تحتاج إليه)، حدد الصفوف or الأعمدة من حذف نوع القسم، واختيار الصفوف الفارغة or أعمدة فارغة تحت نوع مفصل سيكتيون، سي لقطة الشاشة:

دوك إخفاء الصفوف فارغة شنومكس

3. ثم انقر فوق Ok ، تمت إزالة الصفوف أو الأعمدة الفارغة في التحديد مرة واحدة. انظر لقطة الشاشة:

دوك إخفاء الصفوف فارغة شنومكس

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

انقر مجانا تحميل كوتولس فور إكسيل الآن!


Kutools for Excel يحل معظم مشاكلك ، ويزيد من إنتاجيتك بنسبة 80٪

  • إعادة استخدام: إدراج بسرعة الصيغ المعقدة ، الرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة المرور إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر الفورمولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (بسهولة قراءة وتحرير أعداد كبيرة من الخلايا) ؛ لصق على المدى المصفى...
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ انقسام خلايا المحتوى ؛ الجمع بين تكرار الصفوف / الأعمدة... منع الخلايا المكررة. مقارنة النطاقات...
  • حدد تكرار أو فريد الصفوف. حدد صفوف فارغة (جميع الخلايا فارغة) ؛ سوبر البحث والعثور غامض في العديد من المصنفات ؛ اختيار عشوائي ...
  • نسخة طبق الأصل خلايا متعددة دون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة. إدراج الرصاصات، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، حذف حسب الموضع ، إزالة الفضاء. إنشاء وطباعة مجاميع ترحيل الصفحات ؛ تحويل بين محتوى الخلايا والتعليقات...
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ تصنيف متقدم حسب الشهر / الأسبوع / اليوم ، التردد وأكثر ؛ فلتر خاص بواسطة جريئة ، مائل ...
  • الجمع بين المصنفات وأوراق العمل. دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; دفعة تحويل XLS ، XLSX وقوات الدفاع الشعبي...
  • أكثر من ميزات 300 القوية. يدعم Office / Excel 2007-2019 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. ميزات كاملة النسخة التجريبية المجانية من 30.
علامة التبويب kte 201905

علامة تبويب Office توفر واجهة مبوبة لـ Office ، واجعل عملك أسهل بكثير

  • تمكين تحرير علامات التبويب والقراءة في Word و Excel و PowerPointوالناشر والوصول ، Visio ومشروع.
  • افتح مستندات متعددة وقم بإنشائها في علامات تبويب جديدة لنفس النافذة ، وليس في نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50٪ ، ويقلل مئات نقرات الماوس لك كل يوم!
أسفل مكتبه
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.