اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

أريد كود يجمع أربع ماكروات بماكرو واحد


ibra

الردود الموصى بها

السلام عليكم ورحمة الله وبركاته

نطمع من حضراتكم بمساعدة أخرى وهي كود يجمع أربع ماكروات بماكرو واحد

وأسماء الماكروات(هي module10,module3.module2.module1)

بحيث تعمل الأربعة بكبسة زر واحدة

علما بأن ورقة العمل أسمها (التحليل)

وشكرا لكم مقدما

رابط هذا التعليق
شارك

Sub all()

Application.Run "test1"

Application.Run "test2"

Application.Run "test2"

Application.Run "test4"

End Sub

الأخ الفاضل

تفضل

حيث test4 ، test3 ، test2 ، test1 هى أسماء الماكروات المراد تنفيذها والموضوعة فى module1

تم تعديل بواسطه دغيدى
رابط هذا التعليق
شارك

Sub all()

Application.Run "test1"

Application.Run "test2"

Application.Run "test2"

Application.Run "test4"

End Sub

الأخ الفاضل

تفضل

حيث test4 ، test3 ، test2 ، test1 هى أسماء الماكروات المراد تنفيذها والموضوعة فى module1

أشكرك أخي الكريم وبارك الله بجهودك لقد عمل الكود بشكل ممتاز

تم تعديل بواسطه ibra
رابط هذا التعليق
شارك

أخى وصديقى الحبيب

ياسر الحافظ " ابو الحارث "

يسر الله طريقكم

حفظكم الله من كل شر

الله حارثكم من كل سوء

تم تعديل بواسطه دغيدى
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information