كيفية تشغيل نفس الماكرو على عدة أوراق عمل دفعة واحدة في Excel؟

في Excel، يمكنك تشغيل ماكرو على ورقة عمل واحدة، ولكن ماذا لو كنت بحاجة لتطبيق نفس الماكرو عبر عدة أوراق دفعة واحدة؟ بدلاً من تشغيل الماكرو لكل ورقة على حدة، يمكنك تنفيذه على جميع الأوراق المحددة في وقت واحد. في هذا الدليل، سنوضح لك كيفية استخدام VBA لتشغيل نفس الماكرو عبر عدة أوراق عمل بطريقة أكثر كفاءة، مما يوفر لك الوقت والجهد.

تشغيل أو تنفيذ نفس الماكرو على عدة أوراق عمل في نفس الوقت باستخدام كود VBA

تشغيل أو تنفيذ نفس الماكرو على عدة أوراق عمل في نفس الوقت باستخدام كود VBA

لتشغيل ماكرو على عدة أوراق دون تشغيله ورقة ورقة، يمكنك تطبيق الكود التالي لـ VBA، يرجى القيام بما يلي:

1. اضغط مع الاستمرار على مفتاحي ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.

2. انقر فوق إدراج > وحدة، ثم قم بلصق الماكرو التالي في نافذة الوحدة.

كود VBA: تشغيل نفس الماكرو على عدة أوراق عمل في نفس الوقت:

Sub Dosomething()
    Dim xSh As Worksheet
    Application.ScreenUpdating = False
    For Each xSh In Worksheets
        xSh.Select
        Call RunCode
    Next
    Application.ScreenUpdating = True
End Sub
Sub RunCode()
    'your code here
End Sub

ملاحظة: في الكود أعلاه، يرجى نسخ ولصق الكود الخاص بك بدون عنوان Sub وتذييل End Sub بين سكريبتات Sub Runcode() و End Sub . شاهد لقطة الشاشة:

3. بعد ذلك ضع المؤشر عند الجزء الأول من الماكرو، واضغط على مفتاح F5 لتشغيل الكود، وسيتم تطبيق الكود الخاص بك على كل ورقة على حدة.

إزالة الماكروهات بسهولة من عدة مصنفات

أداة Kutools لـ Excel الخاصة بإزالة جميع الماكروهات بالدفعة تتيح لك إزالة الماكروهات بسرعة من عدة مصنفات دفعة واحدة.

Kutools لـ Excel - قم بتعزيز Excel بأكثر من 300 أدوات أساسية. استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! احصل عليه الآن