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

تنزيل المصنف

أنت يمكنك تنزيل مصنف Excel التدريبي المجاني من هنا.

إخفاء الصفوف باستخدام VBA.xlsm

14 طريقة مع VBA لإخفاء الصفوف في Excel

في هذا القسم ، سنناقش 12 طريقة مختلفة مع VBA إلى إخفاء الصفوف في Excel. المثال الذي سنستخدمه في جميع أنحاء المقالة موضح أدناه.

1. قم بتضمين VBA لإخفاء صف واحد في Excel

إذا كنت تريد إخفاء صف واحد مع كود VBA ، فاتبع الخطوات الموضحة أدناه. في حالتنا ، سنخفي رقم الصف 5 ( اسم العائلة ) من مجموعة البيانات الخاصة بنا.

الخطوات:

• اضغط على Alt + F11 على لوحة المفاتيح أو انتقل إلى علامة التبويب Developer - & gt؛ Visual Basic لفتح محرر Visual Basic .

• في التعليمات البرمجية المنبثقة نافذة ، من شريط القوائم ، انقر فوق إدراج - & GT. الوحدة النمطية .

• انسخ الكود التالي والصقه في نافذة الكود.

8771

الكود الخاص بك الآن جاهز لتم إخفاء " الكيمياء ".

14. ماكرو لإخفاء الصفوف استنادًا إلى القيمة الرقمية للخلية في Excel

لقد رأيت سابقًا كيفية إخفاء صف بناءً على قيمة نص الخلية ، هذه المرة ستتعلم كيفية القيام بذلك عندما تكون القيمة هو رقم . في حالتنا ، سنقدم لك مثالاً بالصف الذي يحتوي على القيمة الرقمية " 87 " ، الصف 7 ونزودك بالكود الخاص بكيفية إخفاء هذا الصف.

الخطوات:

• افتح محرر Visual Basic من علامة التبويب المطور و إدراج a الوحدة النمطية في نافذة التعليمات البرمجية.
• في إطار التعليمات البرمجية ، انسخ الكود التالي والصقه.

7728

الكود الخاص بك جاهز الآن للتشغيل.

هنا ،

• StartRow = 4 - & gt؛ الصف الأول من مجموعة البيانات.
• LastRow = 10 - & gt؛ الصف الأخير من مجموعة البيانات.
• iCol = 4 - & gt؛ عنوان العمود الذي يحتوي على قيمة النص .

• تشغيل هذا رمز ولاحظ أن رقم الصف 7 الذي يتكون من القيمة الرقمية " 87 " مخفي.

قراءة المزيد: كيفية إخفاء الصفوف استنادًا إلى قيمة الخلية في Excel (5 طرق)

الخاتمة

أظهرت هذه المقالة يمكنك كيفية إخفاء الصفوف في Excel باستخدام VBA . آمل أن يكون هذا المقال مفيدًا جدًا لك. لا تتردد في السؤال عما إذا كان لديك أي أسئلة بخصوص هذا الموضوع.

هنا ،

• أوراق العمل ("Single") = تعيين اسم ورقة العمل .
• النطاق ("5: 5") = اجتياز رقم الصف 5 داخل طريقة النطاق .

• اضغط على F5 على لوحة المفاتيح أو من شريط القائمة حدد Run - & gt؛ تشغيل Sub / UserForm . يمكنك أيضًا النقر فوق رمز التشغيل الصغير في شريط القائمة الفرعية لتشغيل الماكرو.

لاحظ في الصورة أدناه ، رقم الصف 5 مخفي بعد تنفيذ كود VBA .

اقرأ المزيد: صيغة لإخفاء الصفوف في Excel (7 طرق)

2. إدراج ماكرو لإخفاء الصفوف المجاورة في Excel

لقد تعلمت كيفية إخفاء صف واحد باستخدام VBA . لكن افترض أنك تريد إخفاء نطاق من الصفوف المتجاورة . يمكنك القيام بذلك أيضًا باستخدام VBA في Excel. سنخفي عدد الصفوف من 5 إلى 7 من مجموعة البيانات الموضحة أعلاه.

الخطوات:

• نفس الشيء بالطريقة السابقة ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل وحدة في نافذة التعليمات البرمجية.
• في نافذة التعليمات البرمجية ، انسخ الكود التالي والصقه.

5993

الرمز الخاص بك جاهز الآن للتشغيل.

هنا ،

• أوراق العمل ("متجاورة") = تعيين اسم ورقة العمل .
• النطاق ("5: 7") = مرر رقم الصف 5 إلى 7 داخل طريقة Range .

• Run هذا الرمز وانظر فيهالصورة التالية التي الصفوف 5 إلى 7 مخفية الآن.

اقرأ المزيد: How to إخفاء وإظهار الصفوف في Excel (6 أسهل طرق)

3. قم بتضمين ماكرو لإفراز صفوف غير متجاورة

ستتعلم هذه المرة كيفية إخفاء الصفوف في Excel غير متجاورة مع VBA . مع مجموعة البيانات الخاصة بنا ، يتم تقديم الكود إخفاء الصفوف 5 و 6 و 8 و 9 أدناه.

الخطوات:

• كما هو موضح سابقًا ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل وحدة في نافذة التعليمات البرمجية.
• في نافذة التعليمات البرمجية ، انسخ الكود التالي والصقه.

9238

الرمز الخاص بك جاهز الآن للتشغيل.

هنا ،

• أوراق العمل ("غير متجاورة") = اضبط اسم ورقة العمل .
• النطاق ("5: 6، 8: 9 ”) = تمرير رقم الصف 5 إلى 6 و 8 إلى 9 داخل طريقة النطاق .

• قم بتشغيل هذا الجزء من التعليمات البرمجية ولاحظ أن الصفوف من 5 إلى 6 و 8 إلى 9 مخفية في الصورة التالية.

اقرأ المزيد: كيفية إخفاء الصفوف في Excel (6 طرق فعالة)

4. ماكرو لإخفاء جميع الصفوف التي تحتوي على نصوص في Excel

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

الخطوات:

• افتح محرر Visual Basic من علامة التبويب Developer و أدخل a الوحدة النمطية في نافذة التعليمات البرمجية.
• في إطار التعليمات البرمجية ، انسخ الكود التالي والصقه.

5493

الكود الخاص بك جاهز الآن للتشغيل.

هنا ،

• IsNumeric (Range (“C” & amp؛ i)) = تبدأ البيانات في مجموعة البيانات الخاصة بنا من العمود C ، لذلك مررنا C داخل طريقة النطاق .

• قم بتشغيل هذا الرمز وستلاحظ جميع الصفوف التي كانت تحتوي على نص قيم مخفية الآن.

اقرأ المزيد: كيفية إظهار عدة صفوف في Excel (9 طرق)

5. ماكرو لإخفاء جميع الصفوف التي تحتوي على أرقام في Excel

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

الخطوات:

• افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
• في نافذة التعليمات البرمجية ، انسخ الكود التالي والصقه.

3178

الكود الخاص بك جاهز الآن للتشغيل.

هنا ،

• IsNumeric (Range (“C” & amp؛ i)) = تبدأ البيانات في مجموعة البيانات الخاصة بنا من العمود C ، لذلك مررنا C داخل طريقة Range .

• قم بتشغيل هذا الرمز ولاحظ أن جميع الصفوف التي كانت تحتوي على قيم رقمية من قبل أصبحت الآن مخفي.

قراءة المزيد: إخفاء الصفوف المكررة استنادًا إلى عمود واحد في Excel(4 طرق)

6. ماكرو لإخفاء الصفوف التي تحتوي على صفر (0) في Excel

لنفترض أنك تريد إخفاء الصفوف فقط من عمود معين يحتوي على 0 (صفر) . انظر إلى مجموعة البيانات التالية حيث يحتوي العمود E على 0 في الصف 7 و 82 في الصف 10 . سنتعلم كيفية إخفاء الصف الذي يحمل 0 ( الصف 7 ) مع VBA في Excel.

الخطوات:

• افتح محرر Visual Basic من علامة التبويب المطور و إدراج a الوحدة النمطية في نافذة التعليمات البرمجية.
• في نافذة التعليمات البرمجية ، انسخ الكود التالي والصقه.

8266

الكود الخاص بك جاهز الآن للتشغيل.

• قم بتشغيل هذا الرمز ولاحظ أن الصف ( الصف 7 ) الذي يحتوي على 0 في العمود E مخفي الآن بينما الصف 10 الذي يحمل 82 غير مخفي.

اقرأ المزيد: كيفية إخفاء الصفوف الفارغة في Excel VBA (4 طرق مفيدة)

7. قم بتطبيق ماكرو لإخفاء الصفوف التي تحمل قيمًا سلبية في Excel

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

الخطوات:

• افتح محرر Visual Basic من علامة التبويب Developer و أدخل a الوحدة النمطية في نافذة التعليمات البرمجية.
• في إطار التعليمات البرمجية ، انسخ الكود التالي والصقه.

3249

Your الكود جاهز الآن للتشغيل.

• قم بتشغيل هذا الرمز ولاحظ أن الصف 7 الذي كان يحتوي على القيمة السالبة (-10) في العمود E مخفية الآن بينما الصف 10 الذي يحمل 82 غير مخفي.

8. قم بتضمين VBA لإخفاء الصفوف التي تحتوي على قيم موجبة في Excel

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

الخطوات:

• فتح Visual Basic Editor من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
• في نافذة التعليمات البرمجية ، انسخ الكود التالي والصقه.

5571

الرمز الخاص بك جاهز الآن للتشغيل.

• Run هذا الرمز ولاحظ أن الصف 7 الذي كان يحتوي على قيمة موجبة (55) في العمود E مخفي الآن بينما الصف 10 الذي يحمل 0 غير مخفي.

اقرأ المزيد: VBA لإخفاء الصفوف استنادًا إلى الخلية القيمة في Excel (14 مثالاً)

9. ماكرو لإخفاء الصفوف التي تحتوي على أرقام فردية في Excel

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

الخطوات:

• افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
• في الكود نافذة ، انسخ الكود التالي والصقه.

5883

الرمز الخاص بك جاهز الآن للتشغيل.

• تشغيل هذا الجزء من الكود وانظر أن الصف 7 الذي كان يحتوي على رقم فردي (55) في العمود E مخفي الآن بينما الصف 10 الذي يحمل رقم زوجي (82) غير مخفي.

10. VBA لإخفاء الصفوف التي تحتوي على أرقام زوجية في Excel

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

الخطوات:

• افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
• في الكود نافذة ، انسخ الكود التالي والصقه.

1129

الكود الخاص بك جاهز الآن للتشغيل.

• تشغيل هذا الرمز ونرى أنه فقط الصف 7 الذي كان يحتوي على رقم زوجي (100) في العمود F مخفي الآن بينما الصف 10 الذي يحمل رقم فردي (75) غير مخفي.

اقرأ المزيد: Excel VBA: إظهار كافة الصفوف في Excel (5 أمثلة عملية)

11. قم بإدراج ماكرو لإخفاء الصفوف التي تكون أكبر من شرط معين

يمكنك إخفاء الصفوف الأكبر من قيمة معينة باستخدام VBA Excel. افترض أنك تريد إخفاء الصفوف من العمود E حيث تكون القيمة أكبر من 80 . إليك كيفية القيام بذلك:

الخطوات:

• افتح محرر Visual Basic من علامة التبويب Developer و أدخل a الوحدة النمطية في نافذة التعليمات البرمجية.
• في إطار التعليمات البرمجية ، انسخ الكود التالي والصقه.

1621

Your الكود جاهز الآن للتشغيل.

• قم بتشغيل هذا الرمز وانظر فقط الصف 10 الذي كان يحتوي على 82 (أكبر من 80) في العمود E مخفي الآن بينما الصف 7 الذي يحمل 55 غير مخفي.

قراءة المزيد: إخفاء الصفوف استنادًا إلى قيمة الخلية مع التنسيق الشرطي في Excel

12. تضمين ماكرو في صفوف الغلاف التي هي أقل من شرط محدد في Excel

يمكنك أيضًا إخفاء الصفوف التي تقل عن قيمة محددة باستخدام VBA Excel . افترض أنك تريد إخفاء الصفوف من العمود E حيث تكون القيمة أقل من 80 . إليك كيفية القيام بذلكأن:

الخطوات:

• افتح محرر Visual Basic من علامة التبويب المطور و إدراج a الوحدة النمطية في نافذة التعليمات البرمجية.
• في نافذة التعليمات البرمجية ، انسخ الكود التالي والصقه.

4693

الرمز الخاص بك جاهز الآن للتشغيل.

• قم بتشغيل هذا الرمز وانظر فقط الصف 7 الذي كان يحتوي على 55 (وهو أقل من 80) في العمود E مخفي الآن بينما الصف 10 الذي هو الذي يحمل 82 غير مخفي.

13. إخفاء الصفوف استنادًا إلى قيمة نص الخلية باستخدام الماكرو

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

الخطوات:

• افتح محرر Visual Basic من علامة التبويب Developer و أدخل وحدة في نافذة التعليمات البرمجية.
• في نافذة التعليمات البرمجية ، انسخ الكود التالي والصقه.

1177

الرمز الخاص بك هو الآن جاهز للتشغيل.

هنا ،

• StartRow = 4 - & gt؛ الصف الأول من مجموعة البيانات.
• LastRow = 10 - & gt؛ الصف الأخير من مجموعة البيانات.
• iCol = 4 - & gt؛ عنوان العمود الذي يحتوي على قيمة النص .

• تشغيل هذا رمز ولاحظ أن رقم الصف 6 والذي يتكون من الكلمة