طلب عند فتح ملف اكسل به فورم يقوم باخفاء جميع ملفات الاكسل المفتوحة

[محمد عبدالسلام]

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

في الملف المرفق كود  الاستاذ / حسين مامون  جزاك الله عنا خير جزاء

ممكن مساعدتي جزاكم الله خيرا اريد عند نقر على زر الستعلام من الفورم لفتح نسخة احتياطية من الملف الرئيسي اريد عندما يتم فتح نسخة يتم اخفاء الملف الرئسي ويتم اطهار الملف الأخر لا اريد ان يتم فتح ملفين مرة واحدة

 

 

back.zip

[حسين مامون]

عليكم السلام

عليك بوضع هذا الكود في جميع النسخ المحفوظة في حدث Open بحيث لما تفتح نسخة يتنفذ الكود

Private Sub Workbook_Open()
Workbooks("فاتورة.xlsm").Save
Workbooks("فاتورة.xlsm").Close
End Sub

[حسين مامون]

انا شغال عندي 100/100 لا اعرف سبب المشكلة عندك 

ربما صيغة اسم الملف الرئيسي تختلف عما في الكود جرب نسخ اسم الملف الرئيسي والصقه بين علامة التنصيص

 

[محمد عبدالسلام]

جزاك الله خيرا اخي الكريم ونفع بكم وجعله في ميزان حسناتك

تم تعديل ديسمبر 3, 2019 بواسطه محمد عبدالسلام

[حسين مامون]

وجزيت خيرا اخي الكريم