إلى الأستاذان أستاذ @Moosak والأستاذ @ابو خليل والله مبدعين وجزاكم الله خير على اتمام واثراء هذا الموضوع الحيوي الذي يحتاجة معظم المبرمجين . كما اني أشكر أستاذنا @ابو عبد الرحمن اشرف
على فتح هذا الموضوع واثرائه بأسئلته وحواره الموضوعي .............فشكراً جميعاً ويجعله الله في ميزان حسناتكم .
أستاذي الفاضل @ابو عبد الرحمن اشرف بعد دمج مرفق استاذنا @Moosak جزاه الله خير قصر علينا الوقت باقي التجربة ووافنا بالرد .
Zip Folder and CopyLast_3.rar
تفضل أخي هذا هو الكود واذا لم يعمل على نموذجك لأن به أوامر كثيرة ....... افتح نموذج جديد به زر أمر به هذا الكود بيطبع لك أول صفحة فقط .
DoCmd.OpenReport "CHEMM", acViewPreview
DoCmd.PrintOut acPages, 1, 1
و اذا كان هذا طلبك اضغط على أفضل اجابة .
أستاذي الفاضل @ابو عبد الرحمن اشرف أنا شغال على الموضع لك ولي كي أطور البرنامج بس لو ممكن تطول بالك شوي أما لو شاركنا أستاذنا @أبو خليل جزاه الله خير يبقى قصر علينا الوقت .
أستاذي الفاضل @ابو عبد الرحمن اشرف هذا برنامجي بيعطيك نسخة مضغوطة من البرنامج يدوياَ وكل مرة بإسم غير...... أما أسبوعياً أو يوميا أو شهرياً ......... يساعدك فيها أستاذنا الكبير @أبو خليل لأنه تطرق إليها من قبل .
تفضل المرفق .
Zip Folder and CopyLast.rar
وانت فاتح الملف أذهب( File)ثم (Options) ثم (Trust Center) ثم (Trust Center Settings) علم عى الخيار الأسفل ثم (OK) ثم أعد تشغيل البرنامج ......ووافني بالرد .