كيفية تشغيل الماكرو تلقائيًا عند تغيير نتيجة صيغة الخلية؟
لنفترض أن لدي قائمة من الصيغ تعتمد على البيانات في العمود A والعمود B كما هو موضح في لقطة الشاشة التالية، الآن أريد تشغيل كود ماكرو محدد تلقائيًا عندما تتغير نتيجة الصيغة مع تغيير الخلايا المرتبطة بها. هل هناك أي فكرة جيدة لحل هذه المهمة في Excel؟
تشغيل الماكرو تلقائيًا عند تغيير نتيجة صيغة الخلية باستخدام كود VBA
تشغيل الماكرو تلقائيًا عند تغيير نتيجة صيغة الخلية باستخدام كود VBA
يمكن أن يساعدك الكود التالي VBA في تنفيذ كود محدد تلقائيًا عند تغيير خلية نتيجة الصيغة، يرجى القيام بما يلي:
1. انقر بزر الماوس الأيمن على تبويب الورقة الذي تريد استخدامه، ثم اختر عرض الكود من قائمة السياق، في نافذة Microsoft Visual Basic for applications المفتوحة، انسخ والصق الكود التالي في الوحدة النمطية الفارغة:
كود VBA: تشغيل الماكرو تلقائيًا عند تغيير نتيجة صيغة الخلية:
Private Sub Worksheet_Calculate()
'Updateby Extendoffice
Dim Xrg As Range
Set Xrg = Range("C2:C8")
If Not Intersect(Xrg, Range("C2:C8")) Is Nothing Then
Macro1
End If
End Sub
ملاحظة: في الكود أعلاه، C2:C8 هو نطاق خلايا الصيغ التي تريد استخدامها، maco1 هو اسم الماكرو الذي تريد تشغيله تلقائيًا. يرجى تغييره حسب حاجتك.
2. ثم احفظ وأغلق نافذة الكود هذه، الآن، عندما تتغير البيانات في النطاق A2:B8 مما يؤدي إلى تغيير نتيجة الصيغة، يتم تشغيل كود الماكرو الخاص بك فورًا.
أفضل أدوات زيادة الإنتاجية لمجموعة Office
عزز مهاراتك في Excel مع Kutools لـ Excel، وتمتع بكفاءة غير مسبوقة. يقدم Kutools لـ Excel أكثر من300 ميزة متقدمة لتعزيز الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يجلب تجربة التبويبات إلى Office، ويجعل عملك أسهل بكثير
- فعّل تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint
- افتح وأنشئ مستندات متعددة في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ جديدة.
- يمنحك زيادة إنتاجية تصل إلى50% ويوفر عليك مئات النقرات يومياً!