ابو البشر

تفضل استاذي <><><><>

بارك الله فيك اخونا الشباب في فكرك والكبير قدرا .... ممكن الكود الذي اشرت اليه ( الطريقة الثانية ) للعلم والاستفادة ... جزاك الله خيرأ ..... لانه لدي كود واريد ان استفيد من تعدد الطرق ...

طيب جرب ده ...... UPDATE DISTINCTROW (TableX INNER JOIN qy_kan ON TableX.NameX = qy_kan.NameX) LEFT JOIN KindX ON qy_kan.Expr2 = KindX.LikeB SET TableX.NameX = Replace([TableX].[NameX],[LikeA],""), TableX.KindX = [KindX].[LikeB] WHERE (((qy_kan.Expr2)<>""));

؟؟؟؟؟ !!!!!!

ضع داخل زر الحفظ هذه الشيفرة ..... Dim db As DAO.Database Dim rstFrom As Recordset Dim rstTo As Recordset Set db = CurrentDb Dim RC, i, r As Integer Set rstTo = db.OpenRecordset("tbl_add_fasl", dbOpenDynaset) Set rstFrom = db.OpenRecordset("SELECT tbl_saf.id_m, tbl_saf.mr, tbl_saf.id_saf, tbl_saf.saf, tbl_saf.add_fasl FROM tbl_saf WHERE (((tbl_saf.id_m)=" & [Forms]![frm_m_r_f]![cb_mr] & "));", dbOpenDynaset) rstFrom.MoveFirst: rstFrom.MoveLast RC = rstFrom.RecordCount rstFrom.MoveFirst For i = 1 To RC For r = 1 To rstFrom!add_fasl rstTo.AddNew rstTo!id_m = rstFrom!id_m rstTo!mr = rstFrom!mr rstTo!id_saf = rstFrom!id_saf rstTo!saf = rstFrom!saf rstTo!add_fasl = r rstTo.Update Next r rstFrom.MoveNext Next i rstTo.Close rstFrom.Close Set rstTo = Nothing Set rstFrom = Nothing Set db = Nothing

جرب الملف ..... New Microsoft Access قاعدة بيانات.rar

معوض خير

بالاضافة لما ذكر اخي @عمر ضاحى هل لديك نسخة احتياطية

طيب وحدة وحدة عشان نفهم .... انت لديك في النموذج زران .... انظر ... 1_ ماهي وظيفته بالضبط 2_ ما هي وظيفته بالضبط ممكن شرح بسيط ...

ما شاء الله تبارك الله مبارك عليكم @عمر ضاحى و @Foksh واعانكم الله على نفع رواد المنتدى

اخي @عبد الله قدور هل تمكنت من اخفاء عبارة ملف من الشريط بارك الله فيك

هذا ما يوجد بالملف .....

الافضل تعمل جدول خاص بالاسماء ثم تجعل مصدر القائمة هو ذلك الجدول .... للعلم لم اجد اسماء في ملف التكست

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

وعليكم السلام هل الاسم في حقل واحد ام الاسم نجزأ بمعنى اسم الابن في حقل والاب في حقل وهكذا....

عملنا مثلها سابقا .... حاول الاستفادة من دروس السابق .... هنا انظر <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

لم افهم عليك ولكن هل هذا ما تريد . أرشفة الدردشة:يمكن للمستخدمين أرشفة الدردشة بالضغط على اختصار لوحة المفاتيح التالي Ctrl + Alt + Shift + E. 2. تثبيت الدردشة: لتثبيت دردشة ما في تطبيق واتساب ويب، يمكنك الضغط على الأزرار التالية بلوحة المفاتيح على جهاز الكمبيوتر الخاص بك: Ctrl + Alt + Shift + P. 3. بحث في الدردشة: إذا كنت تريد البحث عن دردشة ما في إصدار واتساب على سطح المكتب، فاضغط على الاختصار التالي: Ctrl + Alt + Shift + F. 4. كتم الصوت: باستطاعة مستخدمي واتساب ويب أيضا “كتم صوت” الدردشة الخاصة بإصدار الويب على غرار إصدار الهاتف المحمول، من خلال الضغط على المفاتيح التالية: Ctrl + Alt + Shift + M. 5. حذف الدردشة: يتوفر على إصدار الويب من واتساب خيار لحذف الدردشة، يمكنك الوصول إليه من خلال الضغط على الاختصار الآتي: Ctrl + Alt + Backspace 6. إنشاء مجموعة جديدة: على غرار ميزات إصدار الهاتف المحمول من واتساب، يمكن للمستخدمين بدء أو إنشاء مجموعة جديدة عبر نسخة الويب من خلال الضغط على المفاتيح التالية: Ctrl + Alt + Shift + N. 7. الوصول للملف الشخصي: يمكنك التحقق من معلومات الملف الشخصي و"حول" للمستخدمين الآخرين، من خلال النقر على ازرار لوحة المفاتيح التالية معا: Ctrl + Alt + P. 8. إعدادات الوصول: يمكن للمستخدمين الوصول إلى قائمة إعدادات واتساب بسهولة عبر متصفح الويب بالضغط على: Ctrl + Alt + وعلامة الفاصلة. 9. وضع علامة كغير مقروءة: لتمييز محادثة ما كـ “غير مقروءة”، انقر على الازرار الاتية: Ctrl + Alt + Shift + U

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

اقرأ هذا الموضوع .....

طبعا اكيد انت تريدها لهذه السنة فقط وليس جميع السنوات .... لان الجدول فيها بيانات 2022 اليس كذلك ؟؟؟؟؟؟؟؟؟؟

تفضل ............. Database8 (2).accdb

هل تريد طريقتي السابقة ... لانك لم تأكد لي انها مناسبة لعملك

اذا .. ما هو مصدر التاريخين في between اذا كان مربع نص في نموذج .. اجعل مصدر مربع النص الموجود في التقرير هو مربع النص الموجود في النموذج

كانت اجابة لك اني جمعت كل الدورات الخمسة في جدول واحد لاتمكن من احصائها ...