مشكلة في استيراد شيت معين من ملف اكسل متعدد الشيتات

[sandanet]

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

 

اساتذتي الكرام تحية طيبة وبعد ،،

 

في المثال المرفق برنامج مفتوح المصدر من احد الاخوة الافاضل وظيفته استيراد الشيتات من ملف اكسل ووضعها في جدول داخل قاعدة البيانات

 

المشكلة في البرنامج هي في النقطة رقم 3 حيث انه يظهر لي رسالة خطأ متعلقة بالمتغير الذي يخزن اسم الشيت المختار من الكومبوبكس 

 

ارجو من اساتذتي الكرام الاطلاع على المرفق 

 

تحياتي

New folder.zip

[رمهان]

جرب

   DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel7, mTable, Me.ImportFile, True, Me.SheetNumber.Column(1) & "$"

لم استعطع التجربة لعدم ظهور مربع حوار فتح الملفات. ولكن جرب المحاولة اعلاه 

تحياتي

[sandanet]

صدق يلي سماك خبير هههه ماشاء الله عليك تمت العملية بنجاح 100% ربي يوفقك أخي واستاذي القدير رمهان

[رمهان]

جزيت خيرا والحمد لله رب العالمين