دالة sum و الجمع في تذييل الصفحة وفي تذييل التقرير

[خير الايمان]

السلان عليكم ورحمة الله وبركاته

كل الشكر والتقدير لما تبذلوا هنا من جهد

جعله الله في ميزان حسناتكم

قمت بتفعيل الدالة sum على المرفق ولكنها لا تعمل

رجاء من سياتكم شرح سبب المشكلة

وتقبل الله منا ومنكم صالح الاعمال

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

db1.rar

[ابوخليل]

السلام عليكم

انقل الدالة من تذييل الصفحة الى تذييل التقرير

db1.rar

[خير الايمان]

السلام عليكم ورحمة الله وبركاته

استاذي الفاضل

يعجز اللسان ان يوفي سرعة الاستجابة

وجعلة الله في ميزان حسناتكم

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

[عبد الفتاح كيرة]

تذييل الصفحة يخص الطباعة

و الحسابات تأتى بتذييل التقرير

[احمد الفقي]

السلام عليكم ورحمه الله وبركاته 

لو سمحت هل ممكن عمل الداله sum في تذييل الصفحة حيث اني اعمل تكست بوكس لحساب اجمالي كل صفحة علي حدة وفي النهاية حساب شامل جميه الصفحات هل ممكن ان يكون 

هناك الدالة sum لجمع كل صفحة علي حدة

[ابوخليل]

الصق الجمل التالية في محرر التقرير

Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer)
sPageTxt = 0
End Sub


Private Sub detail_print(Cancel As Integer, PrintCount As Integer)
If PrintCount = 1 Then
sPageTxt = sPageTxt + [total]
End If
End Sub

باعتبار sPageTxt  هو اسم حقل المجموع في تذييل الصفحة

و total  هو اسم الحقل المراد جمعه