DoCmd.SearchForRecord , "", acFirst, "[ID] = " & Str(Nz(Screen.ActiveControl, 0))
الكود يعمل فقط بعد تحديث الليست بوكس
اريد ان يعمل عن طريق الليست بوكست وزر
اريد الفلترة بناء على
الادارة او السنة او الاسم
حاولت ولكن لاتنفع
وبدون فلترة يظهر كل المحتوي
وشكرا جزيلا
واريد ان اشكر الاخ العزيز
kaser906
جزاه الله خيرا
k .906.rar
طبعا كل العادة مجهود اكثر من رائع من انسان محترم كلمة شكرا لاتكفي لك
جزاك الله خير واعطاك ما تتمني
اخر طلب من حضرتك
وهو الفلترة بناء عن الادارة او السنة او الاسم
حاولت ولكن لاتنفع
وبدون فلترة يظهر كل المحتوي
شكرا مرة تانية
k .906.rar
ممكن يكون الكود بالشكل ده
Annualjan : Nz(DSum("[txtadd]";"t_data";"[txtname]=[txtname] and [txtkin]='Annual'and [txtdate]='01/01/2018'to"31/1/2018 ");0)
Annual : Nz(DSum("[txtadd]";"t_data";"[txtname]=[txtname] and [txtkin]='Annual'");0)
نفس دي ولكن اضافة
شهر يناير
txtdate
txtdateend
شهر فبراير
txtdate
txtdateend
وههكذا
نفس كود تجميع الاجازة اللي حضرتك عملته في المشاركة اللي فاتت ولكن إضافة تجميع بالشهور توضيح بالتقرير رقم 3
عايز اعرف كل موظف اخد كام إجازة في كل شهر في تقرير ونوعها
شكرا ليك
شكرا لمبرمجي الاكسس
Report Vacations2
مرفق ملف اريد به عدم تكرر البيانات بالتقرير
Report Vacations3
وتقرير اخر اريد جمع الاجازة ونوعها بناء على الشهر
وشكرا جزيلا
واريد ان اشكر الاخ العزيز
kaser906
جزاه الله خيرا
hr v - Copy - Copy.rar