السلام عليكم ورحمة الله وبركاته
فضلاً لا أمرا ... المطلوب :::
1- تجميع الحقل (m1) في الحقل (Total) بشكل تراكمي
2- ان لا يظهر شيء في الحقل المقابل لحقل (m1) في حال أن قيمته (0)
3- قمت بالتعبئة يدوياً لفهم المطلوب أكثر.
ختاماً بارك الله فيكم
أخوكم مراد
مرفق مثالاً للتوضيح
اذا دعتـــك قدرتك على ظلـــم الناس فتذكر قدرة الله عليــــــك
اخي الفاضل
السلام عليكم ورحمة الله وبركاته
استخدم هذا التعبير للحصول على المجموع التراكمي في حقل Total في التقرير
=IIf([m1]=0;0;nz(DSum("[m1]";"Stotal";"[id]<=" & [id]);0))وهذا ملفك بعد التعديل
بالتوفيق
الاخت زهرة ،،،
كل الكلمات تعجز عن وصف ابداعك ،،،
لكـ مني كل التحية والاحترام ،،،
ولكـ مني دعوة بظهر غيب ،،،
طلب صغير لو تكرمتـِ
أرجو اخفاء القيمة صفر في التراكمي في حال كانت صفراً ،،، بمعنى اخر لا اريدها ظاهرة واريد ان يكون حقلها فارغاً دون التأثير على الحقل الذي يليها في التراكمي...
كما أرجو عمل ضغطة زر لترحيل التراكمي إلى حقل اخر بجانبه ،،، دفعة واحدة مثل الالحاق ولكن ليس بطريقة استعلام الحاق ،،،
ارفق القاعدة للتعديل عليها ،،، وبارك الله فيكـ اختي...
اذا دعتـــك قدرتك على ظلـــم الناس فتذكر قدرة الله عليــــــك
اخي الفاضل
بارك الله بك وجزاك الله كل خير
ملفك بعد التعديل
1. تم عمل كود تحت زر الأمر بحيث ينسخ السجلات من حقل المجموع الى حقل نسخة المجموع
2. تم استبدال الصفر في الكود بعلامة "" دلالة على فراغ
ملاحظة : اذا فتحت النموذج اضغط على زر الأمر لترى النتيجة
ولا تنسى ايضا انه تم التعديل كذلك في النموذج والتقرير
بالتوفيق
الاخت الكريمة زهرة
حفظك الله ورعاك ،،،
استفدت كثيراً مما قدمتيه وتقدميه لهذا الصرح الشامخ
واجهتني مشكلة صغيرة عند تطبيق الكود على النموذج الخاص بي ،،،
ارفق لكـ النموذج الذي يحتوي على التجميع التراكمي لعل وعسى ان تكون هذه اخر مشكلة اواجهها في هذا السياق ،،،
لكـ احترامي وتقديري ،،،
اذا دعتـــك قدرتك على ظلـــم الناس فتذكر قدرة الله عليــــــك
morad2012 كتب:الاخت الكريمة زهرة
حفظك الله ورعاك ،،،
استفدت كثيراً مما قدمتيه وتقدميه لهذا الصرح الشامخ
واجهتني مشكلة صغيرة عند تطبيق الكود على النموذج الخاص بي ،،،
ارفق لكـ النموذج الذي يحتوي على التجميع التراكمي لعل وعسى ان تكون هذه اخر مشكلة اواجهها في هذا السياق ،،،
لكـ احترامي وتقديري ،،،
اخي الكريم مراد
فتحت النموذج وليس به اي مشكله
اين المشكله بالضبط
ارجو ان تشرح لي اين المشاكل التي واجهتها
اختي الكريمة زهرة...
المشكلة في التقرير المسمى End
حيث لا يظهر التجميع كما في الصورة المرفقة
شكرا لتعاونك وادامك الله ذخرا لهذا المنتدى الرائع
تحياتي
اذا دعتـــك قدرتك على ظلـــم الناس فتذكر قدرة الله عليــــــك
بعد اذن مشرفتنا زهرة "ادامك الله"
اخي morad2012
اليك طريقة : وهي ان تجعل مصدر المربع هو (Sumمنm1)
وفي خصائصة تحول الي Over All - انظر الصورة
فيصبح التقرير كما تريد - انظر الصورة
واليك الملف بعد التعديل
لا تؤجل عمل اليوم الي الغد
اخي الفاضل : المحاسب الجديد
بينما انا اعدل في برنامجك قمت انت بالتعديل على مثال الأخ مراد
فشكرا جزيلا على المساعده
ملف جاهز
الاخ مراد : اعتقد ان المشكله انتهت لديك الآن .
بالتوفيق لكم جميعا
تم تعديل هذه المشاركة بواسطة zahrah في 13 أكتوبر 2011 في 22:25
الاخ العزيز المحاسب الجديد
الاخت العزيزة زهرة
حفظكم الله ورعاكم وسدد خطاكم لما فيه الخير ،،، أعلم أنني اتعبتكم ولكن التعب لن يذهب هباءً بإذن الله
لكم مني دعوة بظهر غيب إن شاء الله
ولكن لي ملاحظة واتمنى عليكم إكمالها ،،، وهي أنني لا اريد ان يظهر التراكم بجانب الحقل الفارغ وللتوضيح ارفق صورة حبذا لو تم اخفاء المظلل بالاحمر
تحياتي لكم جميعا
اخوكم مراااد
اذا دعتـــك قدرتك على ظلـــم الناس فتذكر قدرة الله عليــــــك
الشكر والفضل لك اختنا زهرة "ادامك الله"
اخي morad2012
في تفاصيل التقرير وفي حدث قبل الطباعة ضع هذا الكود
If (IsNull([Sumãäm1])) Then Me.Text48.Visible = False Else Me.Text48.Visible = True End If
وسيظهر التقرير بهذا الشكل
واليك الملف بعد التعديل
بالتوفيق
لا تؤجل عمل اليوم الي الغد
بارك الله بك اخي المحاسب الجديد
بارك الله بكـ أختي زهرة
وادامكم ذخرا لهذا الصرح العظيم
انتهت المشكلة بفضل الله ثم بفضلكم
دمت بود
اخوكم مراااد
اذا دعتـــك قدرتك على ظلـــم الناس فتذكر قدرة الله عليــــــك
