عرض التقرير امام النموذج

[jo_2010]

الخبراء الافاضل   لكم التحية

yy.accdb

[شايب]

2 ساعات مضت, jo_2010 said:

الخبراء الافاضل   لكم التحية

السؤال للخبراء

مع ذلك الاجابة ممكن

في زر الامر لفتح التقرير استبدل الامر لديك بالامر التالي

DoCmd.OpenReport "yy", acViewPreview, , , acDialog

اخونا الشايب

 

yy.accdb

تم تعديل نوفمبر 22, 2023 بواسطه شايب
ارفاق الملف

[jo_2010]

1 ساعه مضت, شايب said:

السؤال للخبراء

مع ذلك الاجابة ممكن

في زر الامر لفتح التقرير استبدل الامر لديك بالامر التالي

DoCmd.OpenReport "yy", acViewPreview, , , acDialog

اخونا الشايب

 

yy.accdb 468 kB · 1 download

خالص الشكر لحضرتك ولكن عند التطبيق قابلتنى مشكلة اليك الصورة والتعديل الجديد       خالص الشكر

yy.accdb

[Eng.Qassim]

ليه متعب حالك استاذ يوسف و تعقد الامور على المستخدم ...لو تعمل زر طباعة على التقرير كان افضل 

على كل حال ...استخدم الشفرة التالية ...جوابا لسؤالك 

 DoCmd.OpenReport "yy", acViewPreview

    Dim response As Integer
    response = MsgBox("هل تريد طباعة التقرير ..", vbQuestion + vbYesNo, "اطبع يا يوسف..")

    If response = vbYes Then
        DoCmd.PrintOut
    Else
        DoCmd.Close acReport, "yy"
    End If

 

[jo_2010]

9 دقائق مضت, Eng.Qassim said:

ليه متعب حالك استاذ يوسف و تعقد الامور على المستخدم ...لو تعمل زر طباعة على التقرير كان افضل 

على كل حال ...استخدم الشفرة التالية ...جوابا لسؤالك 

 DoCmd.OpenReport "yy", acViewPreview

    Dim response As Integer
    response = MsgBox("هل تريد طباعة التقرير ..", vbQuestion + vbYesNo, "اطبع يا يوسف..")

    If response = vbYes Then
        DoCmd.PrintOut
    Else
        DoCmd.Close acReport, "yy"
    End If

 

الخبير الفاضل Eng.Qassim

معذرة انا لا اعرف كيف اعمل زر طباعة على التقرير

ثانيا كود احضرتك يظهر الرسالة ولا يظهر التقرير كما هو الحال عند ضغط زر الطباعة 

اريد ان يظهر التقرير و الرسالة معا لمراجعة التقرير اذا كان تمام اطبعة   شكر لك

[Eng.Qassim]

طيب خبرني النتيجة 

 

yy (1).rar

[jo_2010]

11 ساعات مضت, Eng.Qassim said:

طيب خبرني النتيجة 

 

yy (1).rar 43.99 kB · 7 downloads

استاذى الفاضل  

لازالت المشكلة قائمة لان البرنامج الاصلى بالفعل DoCmd.Maximize

وحضرتك لاغتها

[شايب]

15 ساعات مضت, jo_2010 said:

خالص الشكر لحضرتك ولكن عند التطبيق قابلتنى مشكلة اليك الصورة والتعديل الجديد       خالص الشكر

جرب المرفق

 

yy(2).accdb