اذهب الي المحتوي
أوفيسنا

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

قام بنشر

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

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

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

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

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

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

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

قام بنشر
في ٣‏/٧‏/٢٠١٨ at 17:27, مصطفى الفيومى said:

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

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

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

 

في ٣‏/٧‏/٢٠١٨ at 23:19, مصطفى الفيومى said:

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

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

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

  • Like 1
  • 3 years later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information