بالمناسبة الكود يقوم باستيراد اي ملف اكسل وباي عدد من الشيت .... وايضا يمكنه استيراد الشيت حتى بدون وجود الجدول هو يقوم بتكوين جدول بنفس اسم الشيت ... جرب على ملف غير القاعدة الاصلية واعلمنا بالنتيجة .....
وعليكم السلام ورحمة الله وبركاته
نفذ الأتي :
عند فتح التقرير في حدث عند نقر زر الأمر ضع هذا الكود
DoCmd.OpenReport "اسم التقرير", acViewPreview
Me.Visible = False
وفي حدث عند الإغلاق في التقرير ضع هذا الكود
Forms![اسم النموذج المنبثق].Visible = True
اهلا استاذي الفاضل .....
الاضافه هي كما في الصورة اضفنا عملية ترقيم للحقلين ( xPosition و code ) عند طريق كود تحت حقل الاسم في النموذج الفرعي ....
بالتوفيق .....