abouelhassan

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

استاذى الحبيب د.كاف يار ربنا ما يحرمنا منك ابدا يارب بعد تجربة التقرير وجدت شئ استاذى ان شاء الله لا يصعب عليك الفورم المرتبط بالتقرير مربوط بتحديد التاريخ من والى واختيار رقم الصفحة كما بالصورة التاريخ من1/8/2021 الى31/8/2021 فتح الفورم وعمل الفلتر بالتاريخ وظهر كما بالصورة عند الضغط على PRINT التى باعلى الفورم التى تظهر التقرير الذى تم التعديل عليه ظهر هكذا بدون فلتر حيث يظهر كل البيانات لم يظهر ما بالفورم مفلتر احتاج لتعديل الربط بين التقرير والفورم ليعرض التقرير البيانات التى تعرض بالفورم ليس كل البيانات ربنا يكرمك يارب ويزيدك من فضله اللهم امين DATA1041-5.mdb

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

استاذى الحبيب د.كاف يار هل لى بطلب بالتقرير اسماء الSTORE1,STORE2 الخ هل بالامكان استخدام معادلة =DLookUp("iSTORE_Name";"tbl_Stores";"[Indexx]=1") لكى تكتب اسماء ال STORE من الجدول tbl_Stores جزاك الله كل الخير اللهم امين يارب

فضلك الله على عباده استاذى حبيبى د.كاف يار بارك الله فيك وجزيت الجنة يارب يارب يارب يارب احترام من القلب

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

بارك الله فيك استاذى @ابا جودى ربنا يراضيك يارب لدى فورم اسمه frm_Items_Pages وبه زر طباعة تقرير print هنا الاجمالى فى اسفل الصفحة هل بالامكان ان يكون الاجمالى مع اخر سجل بالاعلى وعند الطباعة التقرير لهذا الفورم احتاج تنسيق التقرير لكى يكون كل اجمالى اسفل store هذا هو المطلوب هذا التقرير بالقاعدة بارك الله فيك اخى الكريم DATA1041-5.mdb

ممتاز استاذى د.كاف يار روائع روائع روائع بعد حفظ البيانات فقط نكتب الاسم وسيكتب الباسورد صح كده احترامى وتقديرى وخالص دعائى

اشكرك استاذى بارك الله فيك هذا ليس المطلوب المطلوب احتاج اعاد تنسيق للتقرير انا قمت بتنفيذ الاجمالى لكل الاستور بس احتاج اعادة التنسيق وبالفورم احتاج ان يكون الاجمالى تحت اخر سجل مباشرة اشكرك بارك الله فيك احترامى DATA1041-5.mdb

السلام عليكم اساتذة المنتدى الكرام كل عام وحضراتكم بخير لدى فورم اسمه frm_Items_Pages وبه زر طباعة تقرير هنا الاجمالى فى الفوتر للصفحة هل بالامكان ان يكون الاجمالى مع اخر سجل بالاعلى وعند الطباعة التقرير لهذا الفورم لم استطع وضع الاجمالى هل بالامكان اضافة الاجمالى ايضا مع اخر سجل حتى اتمكن من طباعته يعنى بعد اخر سجل اجد الاجمالى لكل STORE خالص الشككر وخالص الدعاء من القلب لكم اخوانى الافاضل DATA1041-5.mdb

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

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

قد تساعدك هذه القاعدة من تصميم الاخوة بالمنتدى لا اتذكر الاسم db2.mdb

يكفي التعديل التالي Dim myWhere As String myWhere = myWhere & "iPage>3" myWhere = myWhere & " and YEAR = " & Me.Combo97 myWhere = myWhere & "and iBill_Number = '" & Me.txtsearch & "'" Me.Text20 = DSum("iAmount", "tbl_Items", myWhere) بارك الله فيك استاذى وانا اسف جدا لتعبك والله انا عايز الاجمالى بدون الحساب1+2+3 وعندما طبقت التعديل بالاعلى Dim myWhere As String myWhere = myWhere & "iPage>3" myWhere = myWhere & " and YEAR = " & Me.Combo97 myWhere = myWhere & "and iBill_Number = '" & Me.txtsearch & "'" Me.Text20 = DSum("iAmount", "tbl_Items", myWhere) اعطانى الاجمالى بدون الحساب3 فقط ربنا يرضى عنك استاذى احترامى اخيك

استاذى العزيز استاذى محمد أبوعبدالله قمت بعمل تكست اخرى مجاورة اسمهاtext21 ووضعت كود التالى بس لم ينجح للتطبيق على الاثنين تكست الاولى الاجمالى بدون الحساب1 الثانية بدون الحساب1&2&3 Dim myWhere As String myWhere = myWhere & "iPage=1" myWhere = myWhere & " and YEAR = " & Me.Combo97 myWhere = myWhere & "and iBill_Number = '" & Me.txtsearch & "'" Me.Text20 = DSum("iAmount", "tbl_Items", myWhere) myWhere = myWhere & "iPage>3" myWhere = myWhere & " and YEAR = " & Me.Combo97 myWhere = myWhere & "and iBill_Number = '" & Me.txtsearch & "'" Me.Text21 = DSum("iAmount", "tbl_Items", myWhere) بس لم ينجح استاذى مش عارف اعالج الخطأ بارك الله فيك اخى الكريم استاذى العزيز احترامى

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

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

بارك الله فيك استاذى الكريم محمد أبوعبدالله اشكرك استأذنك ممكن شرح الكود يعنى لو عايز اجمالى بدون حساب 1و2و3 اضيف المعيار ازى لانى جربت اضافة الحساب2 و3 ولم يصح الكود myWhere = myWhere & "iPage>1"&"iPage>2"&"iPage>3" myWhere = myWhere & " and YEAR = " & Me.Combo97 myWhere = myWhere & "and iBill_Number = '" & Me.txtsearch & "'" Me.Text20 = DSum("iAmount", "tbl_Items", myWhere) or Dim myWhere As String myWhere = myWhere & "iPage>1" myWhere = myWhere & "iPage>2" myWhere = myWhere & "iPage>3" myWhere = myWhere & " and YEAR = " & Me.Combo97 myWhere = myWhere & "and iBill_Number = '" & Me.txtsearch & "'" Me.Text20 = DSum("iAmount", "tbl_Items", myWhere) شكر وتقدير واحترام من اخيك

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

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

بارك الله فيك استاذى انظر استاذى بالكود الناتج200 بالمعادلة الناتج صحيح 15300 اعزك الله وزادك من فضله هناك خلل فى الكود احترامى استاذى

استاذ محمد أبوعبدالله بارك الله فيك مااقصده استاذى انظر هنا قمت بالبحث بالرقم100 فى السنة المالية2022 الناتج فى اجمالى بدون حساب رقم1=200 مع ان المبالغ=100+15200=15300 وعند البحث بالمبلغ بالرغم من انى ضغطت فى تكست المبلغ كان تكست اجمالى بدون حساب رقم1 بيتفرغ اى بيكون فارغ فى حدث عند الضغط فى تكست ابحث بالمبلغ تتفرغ تكست اجمالى بدون حساب رقم 1اما الان لازال بالتكست رقم 200 احترام من القلب

للرفع رفع الله قدركم

اسعد الله اوقاتك استاذى محمد أبوعبدالله اشكرك اخى بعد تحويل المعادلة لكود اصبح التحديث بطئ هل من حل استاذى لعودة المعادلة ربنا يبارك لك اللهم امين اخيك باحترام

السلام عليكم اخوانى الاساتذة الكرام عباقرة المنتدى احتاج مساعدتكم لو تكرمتم لدى فورم اسمه sersh يمكن البحث فيه بواسطة الرقم كما بالصورة كتبت رقم 100 فى تكست ابحث بالرقم يوجد معادلة بالتكست التى بجوارها اسمها اجمالى بدون حساب احتاج فى حالة البحث بالمبلغ ان لايظهرفى تكست الاجمالى بدون الحساب1 اى شئ تظل بيضاء ولا تظهر نتائج الافى حالة البحث بالرقم فقط شاكر فضلكم وداعى لكم من كل قلبى احترامى DATA1041-5.mdb