دالة dcount حسب الصفحة

[وائل طه]

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

[Eng.Qassim]

لحساب عدد السجلات في كل صفحة اعمل مربع نص في صفحة التقرير ..قم بتسميته مثلا txtPageCount

اجعل التنسيق له قياسي Format=standard

ثم قم بنسخ الاكواد التالية :

Option Compare Database
Option Explicit
Public intPageCount As Integer

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
intPageCount = intPageCount + 1
End Sub

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
    txtPageCount = intPageCount
    intPageCount = 0
End Sub

Private Sub Report_Open(Cancel As Integer)
intPageCount = 0
End Sub

 

[وائل طه]

حبيبي اشكرك طب واكبر واصغر قيمة جزاك الله خيرا

[Eng.Qassim]

7 ساعات مضت, وائل طه said:

واكبر واصغر قيمة

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