لدي جدول اريد تحديث جميع سجلاته
وكل سجل فيه حقل يحدد قيمة التحديث
المرفق يوضح اكثر
بارك الله فيكم
تحديث لجميع سجلات الجدول
مغلق
تفضل يا أخي الكريم ،،، سوف يكون الكود هكذا :
c = DCount("[agdno]", "tsleem")
DoCmd.GoToRecord , , acFirst
For i = 1 To c
DoCmd.SetWarnings False
DoCmd.OpenQuery "newprice"
DoCmd.GoToRecord , , acNext
DoCmd.SetWarnings True
Next i
DoCmd.Requeryلا تنسى أن تحدد الرقم المراد ضربه في عدد الاسهم ...
مرفق المثال بعد التعديل ،،، عسى أن يفي بالغرض .
تحياتي : أبو عقيل
:)
المسلم من سلم الناس من لسانه ويده
كل عام وأنت بالف خير
وشكرا على مرورك ومساعدتك
اسأل الله أن يرزقك ويوفقك دنيا وأخرى
فأنت المنقذ لي بعد الله
إقتباس
اقتباسكل عام وأنت بالف خير
حياك الله أخي أبو وليد وأنت بألف خير وعافية ،،، بالتوفيق إن شاء الله .
تحياتي : أبو عقيل
:D
المسلم من سلم الناس من لسانه ويده
اخي العزيز الكود جميل وفيه فوائد جميله
لدي استفسار عن تنفيذ الكود على سجلات في نموذج فرعي
يعطي رسالة لا يمكن الذهاب الى السجل المحدد
DoCmd.GoToRecord , , acNext
فهل من حل لذلك
جزاك الله خيرا
هذا الموضوع مغلق.