أبوبسمله

السلام عليكم مشاركه م اخى ومعلمى وشيخنا الجليل @ابوخليل التعديل sql = "DELETE t.* FROM " & t.Name

السلام عليكم اتفضل وانصحك باستخدام الداله فى الموضوع التالى لاخى ومعلمى العزيز جعفر بالتوفيق رصيد_تراكمى_1.accdb

وعليكم السلام اتفضل مثال_1.accdb

وعليكم السلام بطريقه اخرى عن طريقه اخى العزيز @Foksh بدون الاستعلام الفرعى الداخلى جزاه الله خير 🌹 SELECT Last([s10].[g10s1]) AS Lastg10s1, Last([s10].[g1s29]) AS Lastg1s29, Max([s10].[g1s30]) AS Maxg1s30 FROM s10 WHERE (((s10.g1s1)=[Forms]![copy2]![g1s1])); copy_1.accdb

الاجمل هو مشاركتكم معنا ومساندتنا دائما وتوجيهنا للصواب ان اخطئنا جزاكم الله عنا كل خير 🌹

السلام عليكم مشاركه مع اخوتى واساتذتى جزاهم الله عنا خيرا بطريقه اخرى عن طريقه اخى واستاذى وشيخنا الجليل @ابوخليل test 110.accdb

مشاركه مع اخى العزيزمحمد @Barna اخى @ازهر عبد العزيز استخدم داله IsNumeric للتحقق اذا كان رقم ام لا بالتوفيق

وفيك بارك الله اخى محمد بالتاكيد اسمح اخى واستاذى العزيز حتى اتعلم وان شاء الله يكون ما يريد اخينا احمد واسمح لى بسؤال هل يمكن بدل علامات استفهام بوجود فواصل الاسطر بناء ع اسم المدرسه

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

تسلم اتفضل الشرح التالى صورته لك فيديو بالتوفيق

السلام عليكم اتفضل اخى احمد @ahmed_204079 ان شاء الله يكون ما تريد بالتوفيق الميزانية ملف بسيط _1.accdb

وعليكم السلام ورحمه الله وبركاته مشاركه مع شيخنا الجليل @ابوخليل جزاه الله عنا كل خير اتفضل بالتوفيق Grade problem2_1.accdb وتم تحويل القاعده ل 2003 لشيخنا الجليل @ابوخليل للاطلاع والمشاركه Grade problem2_2003.mdb

السلام عليكم مشاركه مع اخى العزيز @Foksh اتفضلى اطلعى ع الموضوع التالى استاذه @safaa salem5 لمعلمنا العزيز جعفر جزاه الله عنا كل خير بالتوفيق

احسن الله اليك , واياكم الحل كما ذكره لك اخى @kkhalifa1960 ادخل لعرض تصميم التقرير ومنه ع مصدر السجلات وانظر تحت حقل المسلسل بالتوفيق

السلام عليكم مشاركه مع اخوانى هل هذا ما تريد جرب واخبرنا 11.accdb

عودا حميدا اخى واستاذى جعفر 💐

وعليكم السلام هكذا Call Form_FC.ccc بالتوفيق

السلام عليكم مشاركه مع اخى @محمد احمد لطفى جزاه الله خيرا Private Sub x_Click() Call searchtext(Forms![fxm], Me.x) End Sub Sub searchtext(frm As Form, strtxt As String) Dim ctl As Control For Each ctl In frm.Controls If ctl.ControlType = acOptionButton Then If ctl.Name = strtxt Then ctl.Value = True Else ctl.Value = False End If End If Next End Sub testc_1.accdb

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

السلام عليكم السبب فى ذلك عدم تعريفك للمتغير frm وعند الدخول للنموذج Frm_Loans فان قيمه المتغير تكون فارغه فلذلك يدخل ع الشرط الثانى اتفضل 20240315_1.mdb

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

السلام عليكم ورحمه الله وبركاته كل عام وانتم بخير مشاركه مع اخى @kkhalifa1960 جزاه الله خيرا اتفضل ان شاء الله يكون ما تريد بطريقه اخرى بالتوفيق PRindex_1.accdb

السلام عليكم ورحمه الله وبركاته كيفك اخى ازهر كل عام وانت طيب اتفضل ان شاء الله يكون ما تريد بالتوفيق Q2_1.accdb

جزاك الله خيرا اخى @Foksh ع التوضيح للاخ السائل وحقيقه لااعلم سبب التعارض ولاكن استكفيت بفتح النموذج بشرط ع السجل المطلوب وهو ما قام بايقاف الازرار لانه لا يوجد غير سجل واحد بالنموذج بالنسبه للحذف قم بغلق النموذج بعد الحذف وقبل اغلاق الرساله مع عمل ريفرش للنموذج المفتوح بالخلف عند العوده بالتوفيق

وعليكم السلام ورحمه الله وبركاته وكل عام وانت وجميع الامه الاسلاميه بخير اتفضل بالتوفيق DATE_1.accdb