كيفية إخفاء أو إظهار الأعمدة بناءً على اختيار القائمة المنسدلة في Excel؟
أثناء استخدام Excel ، يمكنك إخفاء أعمدة معينة أو إظهارها بناءً على اختيار القائمة المنسدلة. على سبيل المثال ، إذا حددت لا في القائمة المنسدلة ، فسيتم إخفاء العمود C إلى I ، ولكن إذا حددت نعم ، فسيتم إخفاء الأعمدة المخفية C إلى I. انظر أدناه لقطة الشاشة المعروضة.
في هذه المقالة ، سوف نعرض لك طريقة VBA لإخفاء أو إظهار الأعمدة بناءً على تحديد القائمة المنسدلة في Excel.
إخفاء أو إظهار الأعمدة بناءً على تحديد القائمة المنسدلة في Excel
إخفاء أو إظهار الأعمدة بناءً على تحديد القائمة المنسدلة في Excel
كما هو مذكور أعلاه ، لإخفاء أو إظهار الأعمدة C إلى I بناءً على اختيار القائمة المنسدلة ، يرجى القيام بما يلي.
1. أولاً ، قم بإنشاء القائمة المنسدلة الخاصة بك بنعم ولا التي تحتاجها.
2. ثم اضغط قديم + F11 لفتح Microsoft Visual Basic للتطبيق نافذة.
3. انقر نقرًا مزدوجًا فوق اسم الورقة المفتوحة الحالي في ملف مشروع VBAP لفتح محرر الكود.
4. ثم انسخ والصق كود فبا أدناه في محرر الكود.
كود فبا: إخفاء الأعمدة أو إظهارها بناءً على اختيار القائمة المنسدلة
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20180822
If Target.Column = 2 And Target.Row = 3 Then
If Target.Value = "No" Then
Application.Columns("C:I").Select
Application.Selection.EntireColumn.Hidden = True
ElseIf Target.Value = "Yes" Then
Application.Columns("C:I").Select
Application.Selection.EntireColumn.Hidden = False
End If
End If
End Sub
ملاحظات: في الكود أعلاه ، العمود = 2 والصف = 3 هو مرجع الخلية في القائمة المنسدلة ، والنطاق C: هو الأعمدة التي تريد إخفاءها أو إظهارها ، يرجى تغييرها حسب حاجتك.
5. صحافة قديم + Q مفاتيح في وقت واحد للخروج من Microsoft Visual Basic للتطبيق نافذة.
من الآن فصاعدًا ، عندما تحدد لا في القائمة المنسدلة ، يتم إخفاء جميع الأعمدة المحددة.
ولكن إذا حددت نعم في القائمة المنسدلة ، فسيتم عرض جميع الأعمدة المخفية على الفور.
مقالات ذات صلة:
- كيف يتم ملء الخلايا الأخرى تلقائيًا عند تحديد القيم في القائمة المنسدلة في Excel؟
- كيفية الإكمال التلقائي عند الكتابة في قائمة Excel المنسدلة؟
- كيفية إنشاء تقويم قائمة منسدلة في Excel؟
- كيفية إنشاء قائمة منسدلة قابلة للبحث في Excel؟
- كيفية إنشاء قائمة منسدلة مع تحديدات أو قيم متعددة في Excel؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!