abouelhassan قام بنشر فبراير 9, 2021 قام بنشر فبراير 9, 2021 (معدل) السلام عليكم اخواتى الافاضل محتاج مساعدة بمعادلة شرطية تضاف فى التقرير اليومى rpt_Items_Dates فى صف الاجمالى المعادلة اذا كان ipage= الايراد & النقدية & التمويل لا يتم جمعهم فى الاجمالى يعن هنا كما بالصورة الاجمالى = 3000 لان يوجد معادلة بالاجمالى لا تجمع النموذج الاول بس هذا الموضوع فشل معايا لان المطلوب عدم جمع اسماء معينة مش نموذج ثابت يعنى احتاج المعادلة مرنة تعمل على عدم الجمع بناء على اسم الموجود فى عمودIpage 1000 الايراد و 1000 التمويل و 1000 المدفوع للعميل و1000 النقدية انا عايز معادلة If(ipage=الايراد or النقدية or التمويل لايتم جمعهم فى الاجمالى مش شرط الترتيب لان ممكن ترتيبهم يختلف فالمرجو العمل على الاسم بحيث فى اى وضع هذه الاسماء لا تدخل فى المجموع الله يعزكم ويبارك لكم يارب DATA14.mdb تم تعديل فبراير 9, 2021 بواسطه abouelhassan
abouelhassan قام بنشر فبراير 10, 2021 الكاتب قام بنشر فبراير 10, 2021 (معدل) للرفغ رفع الله قدركم انا احتاج هذا التعديل رجاء اذا لم يتوفر معادلة هل بكود رجاء مع الشكر وخالص الدعاء تم تعديل فبراير 10, 2021 بواسطه abouelhassan
abouelhassan قام بنشر فبراير 11, 2021 الكاتب قام بنشر فبراير 11, 2021 للرفع رفع الله قدركم انا احتاج هذا التعديل رجاء اذا لم يتوفر معادلة هل بكود رجاء مع الشكر وخالص الدعاء
ابوبسمله قام بنشر فبراير 12, 2021 قام بنشر فبراير 12, 2021 وعليكم السلام @abouelhassan اتفضل محاوله منى ان شاء الله تلبى طلبك قمت بوضعها فى حقل Store_1 للنموذج frm_Items_Dates معذرة فالسؤال هو ابو الحسن ولا ابواحسان ونتشرف باسم حضرتك DATA14.mdb 1
abouelhassan قام بنشر فبراير 12, 2021 الكاتب قام بنشر فبراير 12, 2021 اخى فى الله استاذ احمد رضاك الله وارضاك اشكرك جدا الله يرضى عنك محاولة جيدة بس فى شئ احتاج If(ipage=الايراد or النقدية or التمويل لايتم جمعهم فى الاجمالى اما الان لو جربت حضرتك ودخلت منfrm_main الى جميع البيانات او من frm_Items وغيرت فى اسماء الصفحات ستجد ان لا يقوم بجمع كل الصفحات الا صفحة المدفوع للعميل فقط هى التى يقوم بجمعها احتاج الى جمع الجميع ما عدا الثلاث صفحات اذا كان الاسم الايراد- النقدية التمويل تسلم وتعيش اكثر الله خيرك انتظرك اخى اخيك باحترام
ابوبسمله قام بنشر فبراير 12, 2021 قام بنشر فبراير 12, 2021 الشكر لله ثم لاخواننا واساتذتنا جزاهم الله خيرا 3 ساعات مضت, abouelhassan said: احتاج If(ipage=الايراد or النقدية or التمويل لايتم جمعهم فى الاجمالى اتفضل هل هذا ما تريد DSum("iAmount";"[tbl_Items]";"[iPage] Not In (1,2,3) and [idate] between [srch_Date_From] And [srch_Date_To]") DATA14.mdb 1
abouelhassan قام بنشر فبراير 12, 2021 الكاتب قام بنشر فبراير 12, 2021 اعزك الله اخى احمد لم تفلح اذا قمنا بتغير اسم الصفحة لا يتم تغير الجمع لو جربت حضرتك ودخلت منfrm_main الى جميع البيانات او من frm_Items وغيرت فى اسماء الصفحات ستجد ان لا يقوم بجمع كل الصفحات الا صفحة المدفوع للعميل فقط كما هى التى يقوم بجمعها احتاج الى جمع الجميع ما عدا الثلاث صفحات اذا كان الاسم الايراد- النقدية التمويل شكر وتقدير واحترام من اخيك
ابوبسمله قام بنشر فبراير 12, 2021 قام بنشر فبراير 12, 2021 ان شاء الله أحد اخواننا واساتذتنا يفهم المطلوب بشكل واضح ويقدملك المساعده بالتوفيق 1
ابوبسمله قام بنشر فبراير 12, 2021 قام بنشر فبراير 12, 2021 اتفضل اخى الفاضل @abouelhassan ان شاء الله يكون ما تريد تم اضافه الكود لاستدعائه مع التحميل وعند التغيير والضغط ع زر السيرش Sub inDsum() If Me.srch_All = "Negative" Then Me.Sum_1 = DSum("iAmount", "[tbl_Items]", "[iPage] Not In (1,2,3) and [iAmount]<0 and [idate] between [srch_Date_From] And [srch_Date_To]") Else Me.Sum_1 = DSum("iAmount", "[tbl_Items]", "[iPage] Not In (1,2,3) and [idate] between [srch_Date_From] And [srch_Date_To]") End If End Sub DATA14.mdb 1
abouelhassan قام بنشر فبراير 12, 2021 الكاتب قام بنشر فبراير 12, 2021 (معدل) اتقدم اليك اخى بخالص الشكر بس انظر اخى الاجمالى =800 وانا اريد استبعاد الايراد 1000 اريد استبعاد النقدية =1000 اريد استبعاد التمويل =1000 والمدفوع للعميل=0 اذن المفروض الاجمالى = صفر فاهمتنى اخى اعتذر لو مكنتش عارف اوصل لحضرتك شاكر لك كرمك ومساعدتك بميزان حسناتك ان شاء الله يارب تم تعديل فبراير 12, 2021 بواسطه abouelhassan
ابوبسمله قام بنشر فبراير 12, 2021 قام بنشر فبراير 12, 2021 اتفضل اخى الفاضل @abouelhassan الشكر لله ثم لاخواننا واساتذتنا جزاهم الله خيرا ان شاء الله يكون ما تريد Sub inDsum() If Me.srch_All = "Negative" Then Me.Sum_1 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) ElseIf Me.srch_All = "Positive" Then Me.Sum_1 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Else Me.Sum_1 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) End If End Sub DATA14.mdb 1
abouelhassan قام بنشر فبراير 12, 2021 الكاتب قام بنشر فبراير 12, 2021 اعزك الله اخى احمد تسلم ايدك والله رائع هذا هو المطلوب تمام ربنا يعزك اخى ويسترك دائما الله يبارك فيك يارب
ابوبسمله قام بنشر فبراير 12, 2021 قام بنشر فبراير 12, 2021 الان, abouelhassan said: هذا هو المطلوب تمام ربنا يعزك اخى الحمدلله الذى بنعمته تتم الصالحات والشكر كله لله ثم لاخوانى واساتذتى جزاهم الله عنا كل خير وفيك بارك الله بالتوفيق 1
abouelhassan قام بنشر فبراير 12, 2021 الكاتب قام بنشر فبراير 12, 2021 (معدل) اخى الاستاذاحمد الفلاحجي ممكن انسخه الى باقى الصف او كيفية التطبيق على باقى الصف مشكور اخى بارك الله لك وبك تم تعديل فبراير 12, 2021 بواسطه abouelhassan
ابوبسمله قام بنشر فبراير 12, 2021 قام بنشر فبراير 12, 2021 2 ساعات مضت, abouelhassan said: او كيفية التطبيق على باقى الصف اتفضل Sub inDsum() If Me.srch_All = "Negative" Then Me.Sum_1 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=1 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_2 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=2 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_3 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=3 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_4 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=4 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_5 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=5 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_6 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=6 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_7 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]<0 and [iStore_Number]=7 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) ElseIf Me.srch_All = "Positive" Then Me.Sum_1 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=1 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_2 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=2 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_3 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=3 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_4 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=4 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_5 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=5 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_6 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=6 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_7 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iAmount]>0 and [iStore_Number]=7 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Else Me.Sum_1 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=1 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_2 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=2 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_3 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=3 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_4 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=4 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_5 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=5 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_6 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=6 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) Me.Sum_7 = Nz(DSum("iAmount", "[tbl_Items]", "[iPage] Not In (12,2,3) and [iStore_Number]=7 and [idate] between [srch_Date_From] And [srch_Date_To]"), 0) End If End Sub DATA14.mdb 1
jjafferr قام بنشر فبراير 12, 2021 قام بنشر فبراير 12, 2021 السلام عليكم 🙂 هذه قيم الصفحات في جدولك (ولا اعرف لماذا النقدية لها رقم 12 ، بينما المنطق يقول بأنها رقم 1 🙂 ) : . طريقة اخي احمد هي الرجوع الى مصدر البيانات ، اخذها من هناك ، والبدء بتصفيتها ، بينما انا احب ان العب بالبيانات التي تم استيرادها وتصفيتها 🙂 . حاليا معادلة جمع الحقل هي : جمع جميع السجلات ، ما عدا السجل رقم 1 ، وانا سألت اخوي ابوحسان لما عملت هذه المعادلة ، اذا كان يريد يستخدم انواع الصفحات (هذه التسمية القديمة قبل ان يبدلها الآن الى "الحساب") ، فكان رده : لا . اما الآن ، فهو برمجيا يريد جمع السجلات ، بشرط "الصفحة" ، كالتالي (انا سأقوم بحذف شرط عدم جمع السجل الاول في المعادلات التالية) : اذا كانت الصفحة = الايراد (رقم 2) = اجعل قيمتها صفر اذا كانت الصفحة = النقدية (رقم 12) = اجعل قيمتها صفر اذا كانت الصفحة = التمويل (رقم 3) = اجعل قيمتها صفر واجمع بقية انواع الصفحات عليه ، المعادلة ستكون للمستودع رقم 1 : =Sum(IIf([iPage]=2 Or [iPage]=3 Or [iPage]=12,0,[Store_1])) جعفر 2
abouelhassan قام بنشر فبراير 12, 2021 الكاتب قام بنشر فبراير 12, 2021 اعزك الله اخى استاذ احمد بارك الله فيك تسلم ايدك استاذى احمد الفلاحجي كود ممتاز استاذى وحبيبى واخى فى الله jjafferr لا حرمت منك ابداااااااااااااااا منقذى دائما والله اخى بالنسبة للنقدية 12 كلها تجارب كنت بجرب نغير الرقم وبالنسبة للمعادلة تحفة ومختصرة وسهلة عليا جداااااااااااااااااااااااااااااااااااا وظهرت الحاجة اليها لانى لا ادخل فى الاجمالى 3 حسابات للعملاء يخصوا المحل والله احبك اخى فى الله انا اسف لانى بزعجك بس انت منقذى والله واستاذى ابو خليل ربنا يحفظكم يارب شكر وتقدير واحترام من اخيك
jjafferr قام بنشر فبراير 12, 2021 قام بنشر فبراير 12, 2021 21 دقائق مضت, abouelhassan said: بالنسبة للنقدية 12 كلها تجارب هنا وقعت في المحظور !! هذه الارقام يجب ان لا تغيرها ، وانما تقدر ان تغير القيمة في النموذج !! اذا لاحظت الآن ، فجميع اكواد اخوي احمد ، وكودي انا يعتمد على ان : النقدية = 12 !! فرجاء ، قم بتصحيح النقدية في الجدول الى 1 ، وتغيير كودي ، بتغيير الرقم من 12 الى 1 ، هكذا : =Sum(IIf([iPage]=1 Or [iPage]=2 Or [iPage]=3,0,[Store_1])) جعفر 1
abouelhassan قام بنشر فبراير 12, 2021 الكاتب قام بنشر فبراير 12, 2021 اعزك الله وزادك من فضله مالا وعلما وولدا يارب
ابوبسمله قام بنشر فبراير 12, 2021 قام بنشر فبراير 12, 2021 منذ ساعه, jjafferr said: طريقة اخي احمد هي الرجوع الى مصدر البيانات ، اخذها من هناك ، والبدء بتصفيتها ، بينما انا احب ان العب بالبيانات التي تم استيرادها وتصفيتها 🙂 . حاولت المساعده قدر الامكان اللعب مع الكبار عاوز دماغ صاحيه جزاك الله خيرا معلمى العزيز فهذا شغل اساتذه ومعلمين كبار وانا بستفاد كتير لما براجع عملك وكل لما اخى ابواحسان يقلى لاء يخلى دماغى تفوق وانا نايم وهلكان من الشغل واقوم اراجع تانى شغلك اشوف انا وقعت فين واظبط الحمدلله يا ابواحسان معلمنا العزيز ادانى فرصه للمحاوله واسرع بالمواصله معنا جزاه الله خيرا 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.