كيف استورد كل شيتات مصنف مغلق دون فتحه

[ahmed_bahmeed]

السلام عليكم

أرجو إفادتني كيف بعد الضغط على زر كوماند بوتون تظهر نافذة اختار منها اسم مصنف آخر ثم بمجرد الاختيار يستورد كل أوراقه إلى المصنف الحالي؟؟

test.xlsm

تم تعديل سبتمبر 26, 2018 بواسطه ahmed_bahmeed

[Ali Mohamed Ali]

تفضل اخى الكريم

Sub Importsheet()
Dim Importsheet As Worksheet
Sheets.Add Type:= _
"C:\Users\ali mohamed\Desktop\Testing1.xls"
End Sub

 

تم تعديل سبتمبر 26, 2018 بواسطه ali mohamed ali

[Hamdi Edlbi-khalf]

السلام عليكم أخي 

@ali mohamed ali

ماذا لو أردنا التصدير بدلاً عن الاستيراد ،كيف سيُصبِح الأمر عندها ؟

وفقك الله و رعاك 

[Ali Mohamed Ali]

وعليكم السلام استاذى الكريم فى هذه الحالة يمكنك استخدام هذا الملف للترحيل من ملف Main

الى ملف Archive

 

ترحيل الى ملف مغلق.rar

[ahmed_bahmeed]

أشكرك على إفادتك رغم أني متأخر جداً ✈️ في الرد ولكنه كما قيل: لا يذهب العرفُ عند الله والناسِ.