كيفية إخفاء أو إظهار زر أمر بناءً على قيمة خلية محددة في Excel؟
لنفترض أنك تستخدم زر أمر لتشغيل نص VBA في ورقة العمل الخاصة بك. عندما لا يكون نص VBA مستخدمًا في بعض الحالات، تحتاج إلى جعل زر الأمر مخفيًا بدلاً من عرضه في ورقة العمل. ثم إظهاره مرة أخرى عند الحاجة إلى نص VBA. يناقش هذا المقال إخفاء أو إظهار زر أمر بناءً على قيمة خلية محددة في Excel. يرجى اتباع الخطوات التالية.
إخفاء أو إظهار زر أمر بناءً على قيمة خلية محددة باستخدام كود VBA
إخفاء أو إظهار زر أمر بناءً على قيمة خلية محددة باستخدام كود VBA
يمكنك تشغيل الكود التالي لـ VBA لإخفاء أو إظهار زر أمر بناءً على قيمة خلية محددة في Excel.
1. انقر بزر الماوس الأيمن فوق تبويب الورقة الذي يحتوي على زر الأمر الذي تحتاج إلى إظهاره أو إخفائه، ثم انقر فوق عرض الكود من قائمة النقر بزر الماوس الأيمن.
2. في نافذة Microsoft Visual Basic for Applications التي ستظهر، قم بنسخ ولصق الكود التالي لـ VBA في نافذة الكود.
كود VBA: إخفاء أو إظهار زر أمر بناءً على قيمة خلية محددة
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Cells(1, 1).Value <> "1" Then
Me.CommandButton1.Visible = True
Else
Me.CommandButton1.Visible = False
End If
Application.ScreenUpdating = True
End Sub
ملاحظة: في الكود، Cells(1, 1)، 1 و CommandButton1 تشير إلى أن CommandButton1 سيتم إخفاؤه عندما تحتوي الخلية A1 على الرقم 1، وسيتم عرضه إذا كانت الخلية A1 تحتوي على أي قيم أخرى باستثناء الرقم 1. انظر لقطة الشاشة أدناه. ويمكنك تغييرها حسب حاجتك.
مقالات ذات صلة:
- كيفية نسخ قيمة مربع التحرير والسرد إلى الخلية النشطة في 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد