::: اخي طلبك وحسب فهمي البسيط ... غريب نوعا ما ... فانت بهكذا طرح تعمل تكرارات للسجلات بالاستعلام لا حصر لها وليس لها اهمية برمجية .. والافضل ان تضيف حقل جديد يحسب ايام الاجازة بواسطة الدالة datediff ،،ثم تجعع ايام الاجازات لموظف معين وتعمل كل ما تحتاجه ..... الخ ده اقتراحي في القضية ... بالتوفيق
::: من بعد امر استاذي المتالق ابو خليل ... اتمنى له الصحة
::: تفضل هذا المرفق بعد التعديل وفيه عدم السماح بالاضافة في الفرعي الا بعد ان تختار قيمة من Combo51 ... بالتوفيق.
New_up.rar
::: ههههههههاي .. الله يوجهلك الخير يااستاذ (بطران) ؟! بالسعودي طبعا ..
::: شكري وتقديري لمجهودك الرائع استاذ جعفر .
::: روج يشيخ والقلب داعيلك .. انا سعيد جدا بذلك .. ربنا ميوقف لك اي حاجة باي حته .
::: اقتراح مقبول جدا ... ويفي بالغرض المطلوب ... بارك الله بعمرك اخي الكريم .
::: مصطلح يقال عند حصول امر خارج عن المألوف والمتعارف عليه .. او لم يخطر ببال احد من قبل ... بحيث يفاجأ الاخرين ..وهنا اقصد (( السحر العماني !!
::: سلمت يداك يا مبدع . عمل متقن 100% .... وانا سعيد بذلك . لك مني كل التقدير والحب .
::: عندما اريد عمل قائمة اخرى وزر اخر لاضافة 3 سجلات غير التي ضمن الخمس سجلات ,هل عليَ ان اعيد نسخ هذا الكود واضعه تحت حدث الزر الجديد ؟ ام هناك سحرٌ اّخر !! ... (وأمْرٍ دُبِر بِليلْ)؟.
::: نعم يمكن ذلك بعد اذن الاخ عبد الرحمن بواسطة كود يوضع تحت حدث النقر المزدوج للاسم وهو ::
Dim r
r = Me.name
DoCmd.OpenForm "formname", , , "[name]='" & r & "'"
::: حيث formname هو اسم النموذج الذي يريد ان يفتح لنفس اسم الشخص .... بالتوفيق
::: اخي اذا كنت بحاجة لبرنامج كامل يمكنك مراجعة قسم الاعلام ..
::: بخصوص طلبك تم عمل جدول الحركات وبهذا يكون لكل موظف صفحة خاصة به.. طبعا يمكنك اضافة حقول على كلا الجدولين كما تشاء .... بالتوفيق
db1_up.rar