كيف يمكن إخفاء أو إظهار الأعمدة في Excel بناءً على اختيارك من القائمة المنسدلة؟
أثناء استخدام Excel، يمكنك إخفاء أو إظهار الأعمدة المحددة بناءً على اختيارك من القائمة المنسدلة. فعلى سبيل المثال، إذا اخترت «لا»، فسيتم إخفاء الأعمدة من C إلى I، أما إذا اخترت «نعم»، فسيتم إظهارها تلقائيًا. راجع لقطة الشاشة أدناه.
في هذه المقالة، سنعرض لك طريقة باستخدام VBA لإخفاء أو إظهار الأعمدة وفقًا لاختيارك في القائمة المنسدلة بـ Excel.
إخفاء أو إظهار الأعمدة بناءً على اختيار القائمة المنسدلة في Excel
إخفاء أو إظهار الأعمدة بناءً على اختيار القائمة المنسدلة في Excel
كما في المثال أعلاه، لإخفاء أو إظهار الأعمدة من C إلى I وفقًا لاختيارك من القائمة المنسدلة، يُرجى اتباع الخطوات التالية.
1. أولًا، أنشئ قائمة منسدلة تحتوي على «نعم» و«لا» حسب احتياجاتك.
2. ثم اضغط علىAlt + F11 لفتح نافذةMicrosoft Visual Basic for Applications.
3. انقر نقرًا مزدوجًا على اسم الورقة المفتوحة حاليًا في قسمVBAProject لفتح محرر التعليمات البرمجية.
4. بعد ذلك، انسخ ولصق كود VBA أدناه في محرر التعليمات البرمجية.
كود VBA: إخفاء أو إظهار الأعمدة بناءً على اختيار القائمة المنسدلة
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:I الأعمدة التي تريد إخفاءها أو إظهارها. يُرجى تعديل هذه القيم وفقًا لاحتياجاتك.
5. اضغط علىAlt + Q معًا للخروج من نافذةMicrosoft Visual Basic for Applications.
من الآن فصاعدًا، عند اختيارك «لا» من القائمة المنسدلة، سيتم إخفاء جميع الأعمدة المحددة.
أما إذا اخترت «نعم» من القائمة المنسدلة، فسيتم عرض جميع الأعمدة المخفية على الفور.
افتح سحر إكسل مع KUTOOLS AI
- التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
- الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
- برمجة VBA: اكتب وأَنفِذ أكواد VBA بسلاسة تامة.
- تفسير الصيغ: افهم الصيغ المعقدة بسهولة!
- ترجمة النصوص: اكسر الحواجز اللغوية في جداولك الإلكترونية!
مقالات ذات صلة:
- كيف يمكن تعبئة الخلايا الأخرى تلقائيًا عند اختيار قيمة من قائمة منسدلة في Excel؟
- كيف يمكن إكمال النص تلقائيًا أثناء الكتابة في قائمة منسدلة في Excel؟
- كيف تُنشئ تقويمًا كقائمة منسدلة في Excel؟
- كيف تُنشئ قائمة منسدلة قابلة للبحث في Excel؟
- كيف تُنشئ قائمة منسدلة في Excel تسمح باختيار قيم متعددة؟
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل