محمد احمد لطفى

تفضل today: Int((Date()-[تاريخ الميلاد])/365) & " سنة - " & Int(((Date()-[تاريخ الميلاد])/365-Int((Date()-[تاريخ الميلاد])/365))*12) & " شهر - " & Int((((Date()-[تاريخ الميلاد])/365-Int((Date()-[تاريخ الميلاد])/365))*12-Int(((Date()-[تاريخ الميلاد])/365-Int((Date()-[تاريخ الميلاد])/365))*12))*30) & " يوم

أستاذ @أبو عبدالله الحلوانىحاولت العبث بالكود بالفعل لكن ليس لى دراية كافية بالاكواد لم ادرسها و لكن استخدم البرنامج فى عملى وفهمت منكم بعض الاشياء جزاكم الله خيراُ

للأسف مش عارف اطبقها مش مشكلة ازرار دلوقتى ممكن تحديد عدد نسخ الطباعة من النموذج حيث الكود المرفق يتم فتح مربع و يتم تحديد عدد النسخ المراد طباعتها أريد أن اكتب فى خليه فى النموذج عدد النسخ و بالضغط يتم الطباعة مع تحديد شهر الطباعة من النموذج من خانة [Date_M] حيث الكود المرفق فى التقرير يتم فتح مربع و يتم شهر المراد طباعته أريد أن أن يأخذ الشهر من خليه [Date_M] و عند الضغط على الزرار يتم الطباعة أسف على الازعاج وجزاكم الله خيراً

أريد التعديل فى هذا الملف ممكن يتمسح الخطأ فى الخلايا ماعدا الخلية الاخيرة الى فيها تجميع الأخطاء قاعدة بيانات موظفين.accdb

تظهر عندى

أستاذى @ابو البشر نعم زر واحد للمعاينة والطباعة والغاء الامر اذا تم الضغط خطا الزر

أستاذى @Eng.Qassim جزاك الله خيراً أستاذ أبو عبدالله الحلوانى وجد خطأ فى حساب تاريخ الميلاد وتم ضبط الاخطاء فقط أريدها فى اخر عمود فى هذه المشاركة بالاعلى

مصدر الصف فى مربع التحرير والسرد عمودين العمود الاول Column(0) = (crn) و العمود الثانى وهو المطلوب Column(1) = (الجهة الداخلية الوارد منها)

الهدف من هذا الموضوع أن أعرف كيف أتعامل مع البرنامج فى حالة زيادة فترات طب ممكن نبدأ 1 - من 1-1-1990 حتى 1-1-2050 على التقسيم التالى أولا من 1-1-1990 حتى 6-9-2016 يكون الحساب بالاسبوع ( الفترة الاولى ) ثانيا من 1-1-1990 حتى 30-9-2020 يكون الحساب بالشهر ( الفترة الثانية ) حيث date1 حتى 6-9-2016 يكون الحساب بالاسبوع و من 1-7-2016 حتى Date2 يكون الحساب بالشهر ثالثا من 1-1-1990 حتى 1-1-2050 ( الفترة الثالثة ) حيث date1 حتى 6-9-2016 يكون الحساب بالاسبوع و من 1-7-2016 حتى 30-9-2020 يكون الحساب بالشهر و من 1-10-2020 حتى Date2 يكون الحساب بالشهر بالتوفيق

للرفع

للرفع ممكن يتمسح الخطأ فى الخلايا ماعدا الخلية الاخيرة الى فيها تجميع الأخطاء

تفضل 😇 New2.rar

تفضل New 2.rar

للرفع

للرفع

كيف يمكن عمل زر واحد لمعاينة التقرير أو الطباعة أو الغاء الأمر مع تحديد عدد نسخ الطباعة من النموذج مع تحديد شهر الطباعة من النموذج من خانة [Date_M] وجزاكم الله كل خير M_L.rar

للرفع ممكن يتمسح الخطأ فى الخلايا ماعدا الخلية الاخيرة الى فيها تجميع الأخطاء

شكراً أستاذ @Moosak

عن الاضافة على نموذج عندى يأتى خطأ وعند اضافة المكتبة الناقصه يأتى خطأ

جزاك الله خيرا

للرفع

أخى @عبدالقدوس48جزاك الله خيراً مازالت كما هى 1 - الصفحة الاولى 1 , الصفحة الفارغة 2 , الصفحة الثاثة 3 , وهكذا المطلوب عدم حساب الصفحة الفارغة رقم 1 - الصفحة الاولى 1 , الصفحة الفارغة , الصفحة الثاثة 2 , وهكذا

للرفع

مشكلة جديدة ظهرت فى ارقم الصفحات أنه يتم حساب الصفحة الفارغة صفحة و تأخذ رقم وهل يمكن ان يعمل الكود بطريقة اوتوماتيكية Me.PageHeaderSection.Height = 36 * 287 لأنه يختلف فى كل تقرير وجزاكم الله خيراً M_L - Copy (7) (1).rar

شفاك الله وعافاك انا عمرى كان مظبوط ✔️