kanory

سقط سهوا .... 20231220.mdb

جرب واعلمنا بالنتائج .... على العموم هل هذه الصورة المطلوبة للتقرير ؟؟؟؟

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

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

تابع هذا الموضوع ...

هل النماذج فرعية ؟؟؟؟ ام نماذج رئيسية ؟؟؟ وهل كل النماذج مفتوحة ؟؟؟ اذا كانت نماذج رئيسية وكلها مفتوحة غير في الكود بهذا الشكل ... سوف اكتب لك صيغة لعنصر واحد وانت اكمل الباقي """"" rst!ID = Forms![Form1]![T2] ال اسم النموذج الذي يوجد به ذلك العنصر( Form1 ) مع ملاحظة تغيير اسم النموذج

مشاركة مع الاستاذ خليفه صمم التقرير المطلوب ثم اتبع الخطوات حسب الصور لديك .... ان لم تستطع اعلمنا لادراج الملف <<<<<<< Private Sub Report_Open(Cancel As Integer) Me.RecordSource = Form_fr1.SubFr.Form.RecordSource End Sub

لم افهم جيدا هذه !!! ؟؟؟؟ ممكن اسماء مجموعة من تلك الانشطة التي لم يتم تعديلها او فيها خطأ

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

غيرنا التشكيلة .... جرب المرفق بالضغط على التحديث الجديد وشاهد .... Replace&add.mdb

مشاركة مع الغالي @عمر ضاحى جرب واعلمنا بالنتيجة <><><><><><><><><> DoCmd.GoToRecord , , acFirst For i = 1 To Me.mh1 kan = "" If Me.daraja <> "" Then Me.CurrFasl = "F" kan = Me.daraja End If DoCmd.GoToRecord , , acNext Next i For ii = 1 To Me.Recordset.RecordCount If Me.daraja = kan Then Me.CurrFasl = "F" DoCmd.GoToRecord , , acNext End If Next ii MsgBox "لقد تم بنجاح", vbOKOnly

برنامج العقود - 4.accdb

طيب ليش ما يتم في الجدول من الاساس ... على كل حال تم التعديل حسب طلبك في المرفق ... انظر times24.accdb

وفي حالة المواد الاخرى طبعا حيكون بفس المسجل في حقل ROOM صحيح ؟؟؟؟

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

بعد اذنك أخي الفاضل @ابو البشر جرب التصدير الى الاكسل كما فهمت منك واعلمنا بالنتيجة .... علما ان التصدير من النموذج لسجل واحد وهو المعروض لديك واذا صدرت سجل اخر يضاف الى قائمة السجلات في الاكسل وهكذا ..... Desktop.rar

هو كان طالب منك وظيفة كل زر بالتفصيل ... يعني شرح

اعتقد مر علي مثال شبيه لما تطلب في المنتدى كان المثال لطلبات مطعم ... والله اعلم

هنيئا لكما @Foksh و @عمر ضاحى هذه الثقة التي انتم تستحقونها .. اسأل الله لكما التوفيق والسداد ...

وانا ايضا لم يعمل معي ... للاسف

التحزيم ليس هدفه الحماية بارك الله فيك

تابع هذا الموضوع ........

لم تزودنا ببيانات اضافية للتجربة .... على العموم جرب المرفق عسى يفي بالغرض المطلوب ... وحاول تعديل الكود حسب بياناتك الاساسية لديك ... ‏‏مثال (4) - نسخة.accdb

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

حبذا لو تزودنا ببيانات اكثر للتجربة ولكن انظر للسجلين ( جدول قبل دمج الفترات - جدول بعد الدمج هل هذا ما تريد ؟؟؟ )