ما شاء الله لا قوة الا بالله
عمل متقن ولا اجمل ولا اروع
جزاك الله خيرا
وشكري موصول لاستاذنا وحبيبنا عبدالله باقشير
استاذي وأخي الحبيب ابو حنين
حيث انك اذنت لي في ذكر الملاحظات فلدي استفسارين :
فان وجدت لديك الوقت الكافي والا فأنت في حل من ذلك
الاول : حين اطلعت على الوحدة النمطية وجدت الورقات قد اثبت بأسمائها
Dim Art
Art = Array("Sheet17", "Sheet16", "Sheet15", "Sheet14", "Sheet13", "Sheet12", _
"Sheet11", "Sheet10", "Sheet9", "Sheet8", "Sheet7", "Sheet6", _
"Sheet5", "Sheet4", "Sheet3", "Sheet2", "Sheet1")
هل يوجد عبارة تشمل جميع ما بداخل المصنف من ورقات بدون تحديدها داخل الكود
. بارك الله في عمرك و علمك