kha9009lid

وهذا ملف الاخ @ابا جودى بتنسيق 2003 eta.mdb

ما اعرف فين المشكلة من الموقع او من النت عندي لم استطع رفع المرفق

احسنت وسبقتني وبمثال رائع اليوم النت عندي سيئ جدا

في خدمتك اخي الحبيب

لمسات سحرية @ابا جودى ساحر الاكسس

اعرف انك تملك الاجابة ولكن كنت امزح معك عدد الحروف في استعلام Len(Replace([الاسم];" ";"")) عدد الكلمات Len([الاسم])-Len(Replace([الاسم];" ";""))+1 مرفق مثال استعلام3 حساب.accdb

هههههه حبيب البي @ابا جودى المهم النتيجة وصاحب الموضوع وجد طريقتين تؤدي الغرض بخصوص استفسارك تريد اجابة ادفع اول نفس طريقتك مع حبيبنا @عبد اللطيف سلوم

جرب المرفق افتح استعلام2 يطلب ادخال رقم الشهر الاشهر.accdb

جرب المرفق eta.accdb

جرب المرفق اشهر.accdb

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

رائع دائما @ابا جودى

صحيح وبالذات لما يكون الكود طويل ويحتوي على عدد من اسماء الحقول 😣 الشكر لله اخي @rey360

جرب المرفق Database311.accdb

بل الشكر لك اخي ليث انت وكل عضو في هذا الموقع

chr(34) رمز اسكي يعني نص هذة العلامة " و تعني بينري 00100010

بعد اذن استاذي الفاضل ابو عارف chr34 = "

اكيد ممكن القيمة الافتراضية تكون اخر نص تم تسجيلة في tx1 وعند تغييرة يتم تغيير القيمة في للكمبو Me.Combo4 = DLast("[tx1]", "tbl1") جرب الملف المرفق Database210.accdb

ما اجمل مشاركاتك اخي واستاذي ابو عارف

ممكن ذلك باكثر من طريقة بداية نعملها بالطريقة الاصعب 😎 لكون حقول النص غير منظمة فقد عملنا جدولين وعملنا استعلام الحاق لكل من حقلي النص في حدث عند التحديث DoCmd.SetWarnings False DoCmd.RunSQL "insert into tbl1(tx1 )VALUES (tx1)" Me.Combo4.Requery DoCmd.SetWarnings True وكذلك للحقل النصي الثاني ثم عملنا استعلام توحيدي SELECT tx1 FROM tbl1 UNION ALL SELECT txt2 FROM tbl2; وجعلناه هو مصدر القائمة المنسدلة توجد طريقة اسهل من ذلك ربما اضعها في مشاركة تاليه Database2.accdb

😃😃 لا تستعجل يبو اشرف

العفو ياباشا احنا في خدمتك

انت كريم وابو اشرف يستاهل انا لو اعرف اصمم كان شاركت بس والله في العمل يطلبوا مني اعمل البرنامج وهم يصممون النماذج نظامي نظام شيبان لون واحد الافتراضي اهم شي البرنامج يؤدي المطلوب بدون زيادة او نقص وهذا الامر ما يعجب الشباب 🙄

ممكن 😃

هههههه نعم كم تدفع 😃😃 الحقيقة ابا اشرف يستاهل كل خير مشاركات متميزة وعطاء كبير وقام باهداء الموقع العديد من البرامج المتميزة