/ / يقطع ماكرو في إكسل

يقطع ماكرو في إكسل

يمكنك يقاطع ماكرو في تفوق في أي وقت بالضغط على Esc أو Ctrl + Break.

ضع زر أمر في ورقة العمل الخاصة بك وقم بإضافة الأسطر التعليمات البرمجية التالية:

Dim x As Long
x = 5

Do While x > 2
    x = x + 1
Loop

1. انقر فوق زر الأمر الموجود على الورقة. لا يتوقف هذا الماكرو أبدًا لأن الجزء بعد "Do While" سيكون دائمًا صحيحًا (x ستكون دائمًا أعلى من 2).

2. لوقف هذه الحلقة اللانهائية ، اضغط على Esc أو Ctrl + Break. سوف يظهر مربع الحوار التالي:

مربع حوار مقاطعة

3. انقر فوق "إنهاء" لإنهاء الماكرو ، انقر فوق "تصحيح" لإلقاء نظرة على الماكرو في محرر Visual Basic.

4. قم بإضافة سطر التعليمات البرمجية التالي في بداية التعليمة البرمجية إذا كنت لا تريد أن يتمكن مستخدمو البرنامج من مقاطعة الماكرو (غير مستحسن).

Application.EnableCancelKey = xlDisabled

5. على الرغم من إعادة تعيينه تلقائيًا إلى xlInterrupt في نهاية الماكرو الخاص بك ، فإنه من الجيد (عند استخدام سطر التعليمة البرمجية السابقة) لإنهاء الماكرو الخاص بك مع سطر التعليمة البرمجية التالية:

Application.EnableCancelKey = xlInterrupt

ملاحظة: إذا تم تجميد Excel ولم يعد بإمكانك مقاطعة الماكرو ، فاضغط على Ctrl + Alt + Delete وأغلق Excel.

اقرأ أيضًا: