اضافة شرط للكود

**jo_2010** · منذ 8 ساعات

الخبراء الافاضل

بعد التحية

عندى تفرير اريد فتحة بشرط ان تكون حقل colour غير فارغ

برجاء التعديل على الكود

الكود يعمل بكفاءة حسب التاريخ اريد اضافة اللون ايضا لكم الشكر

Me.Refresh
DoCmd.OpenReport "Y_N_Report", acViewPreview, , "ddate= #" & [DDate] & "#", , Screen.ActiveControl.Caption

**jjafferr** · منذ 8 ساعات

وعليكم السلام

اعمل حقل جديد في الاستعلام :

myColour: len([Colour])


وفي المعيار اكتب

<>0

**jo_2010** · منذ 7 ساعات

34 دقائق مضت, jjafferr said:
وعليكم السلام

اعمل حقل جديد في الاستعلام :
myColour: len([Colour])


وفي المعيار اكتب

<>0

الخبير الفاضل

اريد التعديل على الكود حتى لا اربط التقرير بال colour لانة يفتح تقارير اخرى لا تحتوى على colour مع العلم ان الاستعلام داخل التقرير وليس استعلام منفصل

تم تعديل منذ 7 ساعات بواسطه jo_2010

**kkhalifa1960** · منذ 7 ساعات

الكود باضافة شرط اللون :-

DoCmd.OpenReport "Y_N_Report", acViewPreview, , "ddate = #" & [DDate] & "# AND NOT IsNull(colour)", , Screen.ActiveControl.Caption

الردود الموصى بها