فتح تقرير بناء على اختيارات من عدة قوائم

[ahmad soliman]

Test.accdb

السلام عليكم ورحمه الله وبركاته،

فى المرفق يوجد تقرير اريد فتحه من فورم ويوجد بها عدة اختيارات منها القسم ويمكن اختيار اكثر من قسم ويوجد بيها حاله غايب واختيار بين تاريخين أو عدم وجود تاريخ

[دروب مبرمج]

ضع هذا الكود في ازرار التقرير
 

If Not IsNull(TxtFrom) And IsNull(TxtTo) Then

        DoCmd.OpenReport "HR Data", acViewReport, _
        , "EmployeeHiring = #" & TxtFrom & "#"
        
ElseIf Not IsNull(TxtFrom) And Not IsNull(TxtTo) Then

        DoCmd.OpenReport "HR Data", acViewReport, _
        , "EmployeeHiring Between #" & TxtFrom & "#  And #" & TxtTo & "#"

ElseIf IsNull(TxtFrom) And IsNull(TxtTo) Then

        DoCmd.OpenReport "HR Data", acViewReport

End If

تفضل التعديل

Test (1).accdb

[ahmad soliman]

اخى الكريم شكرا على المجهود المبذول ولكن عند التنفيذ عند عدم وضع تاريخ لا يتم اعتبار اختيار الاقسام وتم تجاهل اختيار قائمة الغياب All  معناها غياب وحضور و Absence  معناها الموظف الموجود عنده  اختيار الغياب و Attend  معناها عدم اختيار علامة صح وهو موجود بالتقرير اقصى اليمين كنتيجة للاختيار من الفورم ويجب عرض البيانات التى تحقق الشروط مجتمعه

مثال عند اختيار اقسام A B D واختيار All وتاريخ بين 1/8 و15/8 يتم عرض الموظفين من الاقسام المختارة والذين تم تعيينهم من الفترة المذكورة سواء عندهم اختيار او عد اختيار فى Checkbox  الغياب

تم تعديل أكتوبر 16, 2023 بواسطه ahmad soliman
توضيح