عرض عدد سجلات معينه في التقرير

[mostafaatiya]

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

عندي تقرير بيبدء فيه كل صفحة من واحد وقد قام بعمل التعديل الاخ kanory 

اريد ان يعرض القرير 15 سجل في كل صفحة فقط 

يعني مثلا عندي 1000 سجل في قاعدة البيانات 

اريد التقرير يعرض 15 سجل فقط في كل صفحة 

وجزاكم الله خيرا

بدء الصفحة برقم واحد.rar

[Shivan Rekany]

  في 3‏/7‏/2018 at 14:27, مصطفى الفيومى said:

اريد التقرير يعرض 15 سجل فقط في كل صفحة

Expand  

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

 

بدء الصفحة برقم واحد.rar

[mostafaatiya]

شكرا لمرورك 

ولكن مش ده اللي اقصدة 

 

[jjafferr]

اليك رابطين

 

و

 

و

http://www.databasedev.co.uk/report_printing.html

 

جعفر

[khokh2002]

ارجو ان يفي هذا بالغرض 

 

بدء الصفحة برقم واحد.rar

[Shivan Rekany]

  في 3‏/7‏/2018 at 14:27, مصطفى الفيومى said:

اريد ان يعرض القرير 15 سجل في كل صفحة فقط 

يعني مثلا عندي 1000 سجل في قاعدة البيانات 

اريد التقرير يعرض 15 سجل فقط في كل صفحة

Expand  

 

  في 3‏/7‏/2018 at 20:19, مصطفى الفيومى said:

ولكن مش ده اللي اقصدة

Expand  

اتفضل الك هذا
تم استخدام هذا في التقرير مع فاصل الصفحات
 

Dim MyPagRecCnt As Integer

Private Sub Report_Page()
    MyPagRecCnt = -1
End Sub

Private Sub تفصيل_Format(Cancel As Integer, FormatCount As Integer)
    MyPagRecCnt = MyPagRecCnt + 1
    Counter = MyPagRecCnt
    If Counter Mod 15 = 0 Then
        Me.PageBreak17.Visible = True
        Else
        Me.PageBreak17.Visible = False
    End If
End Sub

 

بدء الصفحة برقم واحد.rar

[co2002co]

  في 3‏/7‏/2018 at 20:19, مصطفى الفيومى said:

شكرا لمرورك 

ولكن مش ده اللي اقصدة 

Expand  

 

[mrbakr]

جزاك الله كل خير