احتاج معادلة شرطية تضاف الى اجمالى تقرير يومى

**abouelhassan** · فبراير 9, 2021

السلام عليكم اخواتى الافاضل

محتاج مساعدة بمعادلة شرطية تضاف فى التقرير اليومى rpt_Items_Dates فى صف الاجمالى

المعادلة اذا كان

ipage= الايراد & النقدية & التمويل

لا يتم جمعهم فى الاجمالى

يعن هنا كما بالصورة الاجمالى = 3000 لان يوجد معادلة بالاجمالى لا تجمع النموذج الاول بس هذا الموضوع فشل معايا لان المطلوب عدم جمع اسماء معينة مش نموذج ثابت يعنى احتاج المعادلة مرنة تعمل على عدم الجمع بناء على اسم الموجود فى عمودIpage

1000 الايراد و 1000 التمويل و 1000 المدفوع للعميل و1000 النقدية

انا عايز معادلة

If(ipage=الايراد or النقدية or التمويل

لايتم جمعهم فى الاجمالى

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

الله يعزكم ويبارك لكم يارب

DATA14.mdbFetching info...

تم تعديل فبراير 9, 2021 بواسطه abouelhassan

**abouelhassan** · فبراير 10, 2021

للرفغ رفع الله قدركم انا احتاج هذا التعديل رجاء

اذا لم يتوفر معادلة هل بكود رجاء

مع الشكر وخالص الدعاء

تم تعديل فبراير 10, 2021 بواسطه abouelhassan

**abouelhassan** · فبراير 11, 2021

للرفع رفع الله قدركم انا احتاج هذا التعديل رجاء

اذا لم يتوفر معادلة هل بكود رجاء

مع الشكر وخالص الدعاء

**أبوبسمله** · فبراير 12, 2021

وعليكم السلام @abouelhassan

اتفضل محاوله منى ان شاء الله تلبى طلبك

قمت بوضعها فى حقل Store_1 للنموذج frm_Items_Dates

معذرة فالسؤال هو ابو الحسن ولا ابواحسان ونتشرف باسم حضرتك

DATA14.mdbFetching info...

**abouelhassan** · فبراير 12, 2021

اخى فى الله استاذ احمد رضاك الله وارضاك

اشكرك جدا الله يرضى عنك

محاولة جيدة بس فى شئ

احتاج

If(ipage=الايراد or النقدية or التمويل

لايتم جمعهم فى الاجمالى

اما الان لو جربت حضرتك ودخلت منfrm_main الى جميع البيانات او من frm_Items

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

احتاج الى جمع الجميع ما عدا الثلاث صفحات اذا كان الاسم الايراد- النقدية التمويل

تسلم وتعيش اكثر الله خيرك انتظرك اخى

اخيك باحترام

**أبوبسمله** · فبراير 12, 2021

الشكر لله ثم لاخواننا واساتذتنا جزاهم الله خيرا

في 12‏/2‏/2021 at 01:26, abouelhassan said:

احتاج

If(ipage=الايراد or النقدية or التمويل

لايتم جمعهم فى الاجمالى

Expand

اتفضل هل هذا ما تريد

DSum("iAmount";"[tbl_Items]";"[iPage] Not In (1,2,3) and [idate] between [srch_Date_From] And [srch_Date_To]")

DATA14.mdbFetching info...

**abouelhassan** · فبراير 12, 2021

اعزك الله اخى احمد

لم تفلح

اذا قمنا بتغير اسم الصفحة لا يتم تغير الجمع

لو جربت حضرتك ودخلت منfrm_main الى جميع البيانات او من frm_Items

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

احتاج الى جمع الجميع ما عدا الثلاث صفحات اذا كان الاسم الايراد- النقدية التمويل

شكر وتقدير واحترام من اخيك

**أبوبسمله** · فبراير 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.mdbFetching info...

**abouelhassan** · فبراير 12, 2021

اتقدم اليك اخى بخالص الشكر بس انظر اخى

الاجمالى =800

وانا اريد استبعاد الايراد 1000

اريد استبعاد النقدية =1000

اريد استبعاد التمويل =1000

والمدفوع للعميل=0

اذن المفروض الاجمالى = صفر

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

تم تعديل فبراير 12, 2021 بواسطه abouelhassan

**أبوبسمله** · فبراير 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.mdbFetching info...

**abouelhassan** · فبراير 12, 2021

اعزك الله اخى احمد

تسلم ايدك والله رائع هذا هو المطلوب تمام ربنا يعزك اخى

ويسترك دائما

الله يبارك فيك يارب

**أبوبسمله** · فبراير 12, 2021

في 12‏/2‏/2021 at 13:15, abouelhassan said:

هذا هو المطلوب تمام ربنا يعزك اخى

Expand

الحمدلله الذى بنعمته تتم الصالحات

والشكر كله لله ثم لاخوانى واساتذتى جزاهم الله عنا كل خير

وفيك بارك الله

بالتوفيق

**abouelhassan** · فبراير 12, 2021

اخى الاستاذاحمد الفلاحجي ممكن انسخه الى باقى الصف

او كيفية التطبيق على باقى الصف

مشكور اخى بارك الله لك وبك

تم تعديل فبراير 12, 2021 بواسطه abouelhassan

**أبوبسمله** · فبراير 12, 2021

في 12‏/2‏/2021 at 13:21, abouelhassan said:

او كيفية التطبيق على باقى الصف

Expand

اتفضل

 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.12 \u0645\u064a\u062c\u0627 \u0628\u0627\u064a\u062a · 40 downloads

**jjafferr** · فبراير 12, 2021

السلام عليكم 🙂

هذه قيم الصفحات في جدولك (ولا اعرف لماذا النقدية لها رقم 12 ، بينما المنطق يقول بأنها رقم 1 🙂 ) :

.

طريقة اخي احمد هي الرجوع الى مصدر البيانات ، اخذها من هناك ، والبدء بتصفيتها ، بينما انا احب ان العب بالبيانات التي تم استيرادها وتصفيتها 🙂

.

حاليا معادلة جمع الحقل هي : جمع جميع السجلات ، ما عدا السجل رقم 1 ،

وانا سألت اخوي ابوحسان لما عملت هذه المعادلة ، اذا كان يريد يستخدم انواع الصفحات (هذه التسمية القديمة قبل ان يبدلها الآن الى "الحساب") ، فكان رده : لا

.

اما الآن ، فهو برمجيا يريد جمع السجلات ، بشرط "الصفحة" ، كالتالي (انا سأقوم بحذف شرط عدم جمع السجل الاول في المعادلات التالية) :

اذا كانت الصفحة = الايراد (رقم 2) = اجعل قيمتها صفر

اذا كانت الصفحة = النقدية (رقم 12) = اجعل قيمتها صفر

اذا كانت الصفحة = التمويل (رقم 3) = اجعل قيمتها صفر

واجمع بقية انواع الصفحات

عليه ، المعادلة ستكون للمستودع رقم 1 :

=Sum(IIf([iPage]=2 Or [iPage]=3 Or [iPage]=12,0,[Store_1]))

جعفر

**abouelhassan** · فبراير 12, 2021

اعزك الله اخى استاذ احمد بارك الله فيك تسلم ايدك

استاذى احمد الفلاحجي كود ممتاز

استاذى وحبيبى واخى فى الله jjafferr

لا حرمت منك ابداااااااااااااااا منقذى دائما

والله اخى بالنسبة للنقدية 12 كلها تجارب كنت بجرب نغير الرقم

وبالنسبة للمعادلة تحفة ومختصرة وسهلة عليا جداااااااااااااااااااااااااااااااااااا وظهرت الحاجة اليها لانى لا ادخل فى الاجمالى 3 حسابات للعملاء يخصوا المحل

والله احبك اخى فى الله

انا اسف لانى بزعجك بس انت منقذى والله واستاذى ابو خليل ربنا يحفظكم يارب

شكر وتقدير واحترام من اخيك

**jjafferr** · فبراير 12, 2021

في 12‏/2‏/2021 at 16:30, abouelhassan said:

بالنسبة للنقدية 12 كلها تجارب

Expand

هنا وقعت في المحظور !!

هذه الارقام يجب ان لا تغيرها ، وانما تقدر ان تغير القيمة في النموذج !!

اذا لاحظت الآن ، فجميع اكواد اخوي احمد ، وكودي انا يعتمد على ان : النقدية = 12 !!

فرجاء ، قم بتصحيح النقدية في الجدول الى 1 ، وتغيير كودي ، بتغيير الرقم من 12 الى 1 ، هكذا :

=Sum(IIf([iPage]=1 Or [iPage]=2 Or [iPage]=3,0,[Store_1]))

جعفر

**abouelhassan** · فبراير 12, 2021

اعزك الله وزادك من فضله مالا وعلما وولدا

يارب

**أبوبسمله** · فبراير 12, 2021

في 12‏/2‏/2021 at 15:55, jjafferr said:

طريقة اخي احمد هي الرجوع الى مصدر البيانات ، اخذها من هناك ، والبدء بتصفيتها ، بينما انا احب ان العب بالبيانات التي تم استيرادها وتصفيتها 🙂

.

Expand

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

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

الحمدلله يا ابواحسان معلمنا العزيز ادانى فرصه للمحاوله واسرع بالمواصله معنا جزاه الله خيرا

**abouelhassan** · فبراير 12, 2021

شكر وتقدير و احترام

تسجيل الدخول

احتاج معادلة شرطية تضاف الى اجمالى تقرير يومى

الردود الموصى بها

abouelhassan

abouelhassan

abouelhassan

أبوبسمله

abouelhassan

أبوبسمله

abouelhassan

أبوبسمله

أبوبسمله

abouelhassan

أبوبسمله

abouelhassan

أبوبسمله

abouelhassan

أبوبسمله

jjafferr

abouelhassan

jjafferr

abouelhassan

أبوبسمله

abouelhassan

Join the conversation

تصفح هذا الموضوع مؤخراً 0 اعضاء متواجدين الان

تصفح الموقع

تصفح جديد الموقع

Support

Important Information