رشبد قام بنشر أغسطس 14, 2023 مشاركة قام بنشر أغسطس 14, 2023 السلام عليكم ورحمة الله الاخوة الكرام لو ممكن اريد تعديل الماكرو في زر طباعة بحيث ادا كانت الخانة mont فارغة لايفتح التقرير ورسالة معلومات غير مكتملة جزاكم الله خيرا الشرط.accdb رابط هذا التعليق شارك More sharing options...
ابوخليل قام بنشر أغسطس 15, 2023 مشاركة قام بنشر أغسطس 15, 2023 عليكم السلام If IsNull(Me.mont) Then msgbox "معلومات غير مكتملة" Exit Sub Else DoCmd.OpenReport "table1", acViewPreview 'لعرض التقرير 'DoCmd.OpenReport "table1", acViewNormal ' طباعة مباشرة End If الشرط.accdb 1 رابط هذا التعليق شارك More sharing options...
رشبد قام بنشر أغسطس 15, 2023 الكاتب مشاركة قام بنشر أغسطس 15, 2023 ابوخليل بارك الله فيك وزادك من فضله لو سمحت اريد اضافة في الكود عرض نافذة اختيار الطابعة رابط هذا التعليق شارك More sharing options...
أفضل إجابة ابوخليل قام بنشر أغسطس 15, 2023 أفضل إجابة مشاركة قام بنشر أغسطس 15, 2023 If IsNull(Me.mont) Then msgbox "معلومات غير مكتملة" Exit Sub Else DoCmd.OpenReport "table1", acViewPreview 'لعرض التقرير DoCmd.RunCommand acCmdPrint End If 2 رابط هذا التعليق شارك More sharing options...
رشبد قام بنشر أغسطس 16, 2023 الكاتب مشاركة قام بنشر أغسطس 16, 2023 الف الف شكر رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.