كيفية تشغيل أو تفعيل ماكرو بالنقر على خلية محددة في Excel؟
أثناء العمل مع Microsoft Excel، قد تعرف كيفية تشغيل ماكرو معين باستخدام زر الأوامر. ولكن هل تعلم كيفية تشغيل ماكرو بالنقر فقط على خلية محددة في ورقة العمل؟ سيوضح لك هذا المقال طريقة تشغيل ماكرو بالنقر على خلية محددة بالتفصيل.
تشغيل أو تفعيل ماكرو بالنقر على خلية محددة باستخدام كود VBA
تشغيل أو تفعيل ماكرو بالنقر على خلية محددة باستخدام كود VBA
يمكن أن يساعدك الكود التالي من VBA في تشغيل ماكرو بالنقر على خلية محددة في Excel. يرجى القيام بما يلي.
1. في ورقة العمل التي تحتوي على الخلية التي تحتاج إلى النقر عليها لتشغيل ماكرو، انقر بزر الماوس الأيمن على تبويب الورقة، ثم انقر على عرض الكود من قائمة السياق.
2. في نافذة Microsoft Visual Basic for Applications، انسخ والصق البرنامج النصي التالي من VBA في نافذة الكود.
كود VBA: تشغيل أو تفعيل ماكرو بالنقر على خلية محددة
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Count = 1 Then
If Not Intersect(Target, Range("D4")) Is Nothing Then
Call MyMacro
End If
End If
End Sub
ملاحظات:
1. في الكود، D4 هي الخلية التي ستنقر عليها لتشغيل الماكرو؛
2. يرجى استبدال اسم الكود MyMacro بالماكرو الذي ستشغله في ورقة العمل. انظر الصورة التوضيحية:
3. اضغط على مفتاحي Alt + Q في نفس الوقت لإغلاق نافذة Microsoft Visual Basic for Applications.
من الآن فصاعدًا، عند النقر على الخلية D4 في ورقة العمل الحالية، سيتم تشغيل الماكرو المحدد الخاص بك فورًا.

اكتشف سحر Excel مع Kutools AI
- التنفيذ الذكي: قم بعمليات الخلية، وتحليل البيانات، وإنشاء المخططات - كل ذلك يتم من خلال أوامر بسيطة.
- الصيغ المخصصة: قم بإنشاء صيغ مصممة خصيصًا لتسهيل سير عملك.
- برمجة VBA: كتابة وتطبيق أكواد VBA بسهولة.
- تفسير الصيغ: فهم الصيغ المعقدة بسهولة.
- ترجمة النصوص: تجاوز الحواجز اللغوية داخل جداول البيانات الخاصة بك.
مقالات ذات صلة:
- كيفية ظهور تقويم منبثق عند النقر على خلية محددة في Excel؟
- كيفية تغيير لون الخلية عند النقر عليها أو تحديدها في Excel؟
- كيفية ظهور مربع رسالة عند النقر على خلية معينة في Excel؟
- كيفية تعطيل الزر بعد النقر عليه مرة واحدة في Excel؟
- كيفية تعطيل النقر بزر الماوس الأيمن على تبويب الورقة في Excel؟
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير
- تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
- افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!