الحلبي

هذا موضوع شيق وهام جدا واشكر الاخ السائل لطرح هذا الموضوع كما تعودنا من استاذنا / @ابو ياسين المشولي جزاه الله خيرا مساعدة الاخرين لى سؤال هنا لماذا لا يتم النسخ عندما اختار مثلا المسار رقم 1 واضغ على زر نسخ لا يتم النسخ ولكن عندما اختار الخمس مسارات يتم الحفظ لكم خالص تحياتى

الاخ الفاضل / على وعليكم السلام اولا شكرا لك للمشاركة للمساعدة جزاك الله خيرا اخى الحبيب انت قمت فقط بتعديل الربط بين الرئيسى والفرعى وجعلته حقل التاريخ (xdate) بدل من حقل (sr) وهذا لا يفى بالغرض حيث انى اريد كل موظف على حده بين بياناته في الرئسي والفرعى فيلزم الربط بالحقل (sr) بمعنى ان كل موظف فى الرئيسي له اكثر من سجل فى الفرعى عموما كانت مشاركة بها محاولة جميلة للتغلب على عدم تكرار كود الموظف جعله الله في ميزان حسناتك انا اكتفيت بالحل الذي قمت به في المشاركة السابقة ولكم جزيل الشكر

استاذي وخبيرنا الفاضل / ابو ياسين لقد توصلت الى الحل بعد عدة محاولات والفضل يرجع لله ثم لحضرتك استعرت الكود الجميل الرائع جدا جدا جدا جدا جدا من حضرتك دون باقى الكود If DCount("*", "t2", "[nume]='" & Me.nume & "'" & "AND [xdate]=#" & Format(Me.xdate, "yyyy/mm/dd") & "#") > 0 Then MsgBox " الاسم مكرر ", vbExclamation, " : خطــــــــأ " واضفت له شرط حقل (القسم) ايضا واصبح كالتالي If DCount("*", "t2", "[nume]='" & Me.nume & "'" & "AND [xdate]=#" & Format(Me.xdate, "yyyy/mm/dd") & "#" & "and xpart='" & Me.part & "'") > 0 Then وعملت استعلام الحاق وغيرت خصائص الحقل sr في الجدول t2 وجعلته رقم حتى يقبل التكرار وارفقت المثال للافادة لكل من ياتى بعدنا بعد عمل بعد التغيرات عليه وبمجرد الضغط على زر الالحاق اصبح يظهر في النموذج الفرعى بمجرد الضغط حاول ان تغير القسم او التاريخ ترى ماذا يحدث طبعا هذا والله العظيم بفضل الله ثم فضلكم علىٌ ربنا يزيدك علما ينتفع به ويكثر من امثالك ويرحم والديك في الدنيا والاخره لك كل احترام وتقدير لشخصكم الكريم عدم التكرار (1).accdb

استاذنا الفاضل / ابو ياسين جزاكم الله خيرا وجعله في ميزان حسناتكم بعد الضغط علي زر الترحيل يتم الترحيل وعند اغلاف النموذج وفتحه تظهر رسالة خطأ اعتقد ان السبب هو تكرار كود الموظف بعد الترحيل مع اني محتاج ان يكون النموذجين يتم الربط بينهما بكود الموظف sr حتى تظهر بيانات كل موظف لحاله وايضا لم يظهر السجل الذي تم ترحيله في الفرعى بمجرد الضغط علي الزر اسف لتعبك معي

مش فاهم الالحاق يتم من النموذج

جعلت الاربع حقول مفتاح اساسى لم يتم اي الحاق جرب على المثال المرفق وشوف بنفسك

جزاك الله خير خبيرنا / محمد ياسين توضيح اكثر للمطلوب : اذا كانت الحقول الاربعة ( اسم الموظف + القسم + التاريخ + كود الموظف) غير موجود في النموذج الفرعى يتم الالحاق اذا تغير حقل احدى الحقول الاربعة يتم الالحاق اما اذا كانت نفس الحقول الاربعة لا يتم الالحاق وتظهر رسالة بانه مكرر جزاك الله خيرا اخى الفاضل / ابو صلاح طب شوف التوضيح في اعلاه يمكن يوضح لحضرتك شويه

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

السلام عليكم نموذج رئيسى به نموذج فرعى لكل منهما جدول (الرئيسى مصدره جدول t1 ـ الفرعى مصدره جدول t2) المطلوب : عند الضغط على زر الالحاق الموجود فى الرئيسى يتم الحاق جميع البيانات من الرئيسى الى الفرعى وتظهر البيانات في الفرعى بمجرد الضغط على زر الالحاق ويتم الالحاق اذا كانت البيانات بتاريخ مختلف لنفس الموظف اما اذا كانت البيانات بنفس التاريخ تظهر رسالة بالتكرار مثلا : الموظف محمد تابع قسم الاداري تاريخه 01/11/2019 يتم الالحاق وعند الضغط مرة اخرى علي زر الالحاق لا يتم الالحاق لانه بنفس التاريخ اي ان الموظف محمد تابع قسم الادارى تاريخه 02/11/2019 (اي تاريخ مختلف) يتم الالحاق وارغب في ان كل موظف فى الرئيسى تظهر بياناته فقط فى الفرعى اي ان الرئيس مرتبط بالفرعى مثلا بكود الموظف حتى لا تظهر جميع الموظفين في الفرعى مرفق مثال مبسط جزاكم الله خيرا عدم التكرار.accdb

الله الله ربنا يزيد ويبارك في خبرائنا مزيد من التقدم في منتدانا العزيز تهنئه لخبيرنا ابو امنه وخبيرنا محمد البرناوي فهم اهل ثقة ومحل خبره اللهم زيدهم علما ننتفع به نحن فعلا يستاهلوها

محاولة لا اكثر اعتقد اننا نحتاج لاستعلام تحديث كما فى المرفق test3.accdb

حبيبى والله الله يفتح عليك كما تعودنا منك جميل فى كل شئ جزاك الله كل خير ويزيدك الله علما

استادنا وخبيرنا /خالد الايكونات الجميلة ارغب في مجموعة منها هل يمكن جزاك الله كل خير

حبيبى واستاذي ومعلمى / الاستاذ جعفر هلا وغلا يعطيك الف عافية فعلا تعلم الصيد افضل بكثير مثال في منتهى الروعه والابداع والشرح وافى جدا وتعدد الافكار فيه كثيرة اسف لك لم ارى مشاركتك الا بعد ان قمت بالرد علي الاستاذ / ابو بسمله رحم الله والديك استاذي / جعفر وغفر لك وجعله في ميزان حسناتك اخى وحبيبى وخبيرنا الاستاذ / خالد ايضا لم اري مشاركتك الا بعد ان قمت بالرد ربنا يارب يبارك فيك ويجعلك خير مساعد لنا ويرزفك من غير حساب ويرحم والديك في الدنيا والاخره اخواني الاعزاء كم انتم اعزاء علي قلبي ربنا يفتح عليكم كمان وكمان لكم كل الاحترام والتقدير

الاستاذ الفاضل / ابو بسمله تمام التمام الله يفتح عليك ويرزقك الفردوس ويجعله في ميزان حسناتك ان شاء الله المثال الذي ارفقته حضرتك تمام وطبقت عندي ولله الحمد على فكرة المثال الذي ارفقته انا ليس به اي مشكله ولكى تعم الفائدة لمن يريد فاليك المثال بعد ان طبقت عليه مثال الاستاذ / احمد يوسف الله يجزاه كل خير ويرحم والديه بيانات بين تاريخين (1).accdb

اخواني الافاضل مرفق مثال مبسط كيف يمكن بالضغط علي زر بحث يقوم باظهار البيانات بين التاريخ الموجودين في النموذج f1 بالكود وليس بالاستعلام ثم الضغط علي زر تحديث يظهر جميع البيانات مرة اخرى جزاكم الله كل خير بيانات بين تاريخين.accdb

اخواني الافاضل لماذا يكون التواصل بينكم فقط لماذا لا يوضع جميع الحلول هنا حتي يستفيد الجميع لا اعرف هل قوانين المنتدي تسمح بذلك

مجرد توضيح لقد وضعت الاكواد كما اشار استاذنا وخبيرنا / عصام ربيع جزاه الله كل خير وكل شئ تمام ولا تظهر الرساله

الله الله عليك استاذنا /علي صادق تمام التمام الله يبارك لك ويجعله في حسناتك ان شاء الله ودعنى اهمس في اذنيك : من خلال وضع الاكواد احس بانك خبير وليس عضو جديد اتوقع قريبا بانك تكون خبير للمنتدي ليس لانك قمت بهذه المشاركة فقط ولكن انا اعلم تماما صدق احساسى واتوقع في ردك ان يكون تواضع وتقولى لي بانك مبتدأ وانك مازلت تتعلم" ولا انسى ابدا استاذي ومعملنا الاستاذ / خالد فهو خبير بمعنى الكلمة وله لمسات خبير جزاكم الله كل الخير

اولا الاستاذ / علي ..... جزاك الله كل خير لم اتمكن من التطبيق لو حضرتك تطبق على المثال المرفق فى المشاركة الاولى اكون شاكرا لك

ولذلك عن البحث عن اسم الموظف محمد شاهين مثلا فانها لا تسمح بتكملة الاسم وعند كتابة اسم الاب ترجع من نقطة البداية كما تفضلت بالتوضيح حضرتك طب ماذا لو اردنا ان نبحث عن بداية اسم الاب كيف نكمل حتي يعطينا كل من هو اسمه محمد ويبدأ اسم ابيه بالحرف الشين مثل شريف مثلا .

استاذنا / خالد ممكن توضيح Me.txt3.SelStart = Len(Me.txt3.Text) هل كلمة selstart دالة اريد ان اعرف معناها جزاكم الله خير

استاذنا وخبيرنا / @kha9009lid والله انك انسان محترم جدا ودائما تسعي لمساعدة الاخرين جزاك الله خير ورحم الله والديك وزادك الله علما نافعا كل الاحترام والتقدير

استاذي الفاضل ومعلمى الجليل ومروض اكسس الباشمهندس / ابا جودي استلمت بضاعتي على اكمل وجهه وحضرتك فهمت طلبى كالعادة وما اروع وما اجمل من هذا الكود من خبير بمعني الكلمة قمت بالتطبيق عندي وكله يعمل في صمت خوفا من مروض الاكسس الذي يقف منتظرا اي تقصير من الكود ربنا يزيدك علما كمان وكمان ويحسن الله لك كما تحسن الينا بأفكارك وينعم عليك بالصحة والعافية استاذنا الجليل / محمد عصام وان شاء سوف تري ابنائك اطباء فقط تخصص اسنان لان جميع اسناني بها مشاكل ربنا يحفظهم لك ـ كل الاخترام والتقدير للباشمهندس /ابا جودي ولكل القائمين لخدمة المنتدي

عيوني لك اخي الحبيب / محمد بس في الليلة الكبيرة يوم ان تفرح بابنائك وتشوفهم اطباء اسنان ان شاء الله