Доступ: нумерация страниц на группу

Question

Я пытаюсь получить "Page n of n Pages" в нижнем колонтитуле для каждой группы.Я могу получить номер страницы для группы, но общее количество страниц не зависит от количества записей в группе, поскольку в зависимости от детализации одной записи может занимать несколько страниц.
Возможно ли это?

Answer 1

Найдена эта страница , но вам нужно оставить где-то невидимым исходное объявление [Page], иначе оно не будет работать правильно.="Page " & [Page] & " of " & [Pages]

Answer 2

Option Compare Database
Dim x As Integer

''''''''''''''' must be written in the header of your group 
Private Sub GroupHeader1_Format(Cancel As Integer, FormatCount As Integer)
Page = 1    
End Sub
''''''''''''''''''''''''''''''''''''''''''''''''''

''''''''''''''''''' paste this code in your page footer 
Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)

dalel_var.Value = Me!dalel_no
   ' to get the total number of rows in the table based on a specific "id" which we group data with it
 x = DCount("'[Me!dalel_no]'", "betakat_istath_alaam", "[dalel_no] = " & dalel_var.Value & "")

If x Mod 15 = 0 Then
x = ((x / 15) + 0.5) - 1 '' arrange your report details out of 15 rows per page
Else
x = ((x / 15) + 0.5)
End If
divide_txt = x            '''' divide_txt is a textbox in the report
End Sub
''''''''''''''''''''''''''

Answer 3

Я не уверен, возможно ли это. Возможно, вы можете использовать код в событии OnFormat вашей группы для расчета количества страниц в группе, но он не будет точным, пока вы не достигнете конца группы.

Я действительно не думаю, что есть решение для этого.

Для чего бы это ни стоило, это не то, что мне когда-либо нужно было делать. Одним из обходных путей будет печать отчета несколько раз, по одному разу для каждой из ваших групп, используя обычное выражение «Page [Page] of [Pages]». Если у вас есть только дюжина или около того групп, это не будет ужасным препятствием. С другой стороны, если у вас есть сотни групп, не так много!