Свойство Report.Pages (Access)

Используйте свойство Pages для возврата сведений, необходимых для печати номеров страниц в отчете. Для чтения и записи, Integer.

Синтаксис

expression. Страниц

Выражение Переменная, представляющая объект Report .

Замечания

Это свойство доступно только в режиме предварительного просмотра или при печати.

Чтобы ссылаться на свойство Pages в макросе или Visual Basic, форма или отчет должны содержать текстовое поле, для свойства ControlSource задается выражение, использующее Pages. Например, можно использовать следующие выражения в качестве параметра свойства ControlSource для текстового поля в нижнем колонтитуле страницы.

Это выражение	Отпечатки
=Страница	Номер страницы (например, 1, 2, 3) в нижнем колонтитуле страницы.
="Page" & Page & "of" & Pages	"Page n of nn" (например, страница 1 из 5, страница 2 из 5) в нижнем колонтитуле страницы.
=Pages	Общее количество страниц в форме (например, 5).

Пример

В следующем примере отображается сообщение, указывающее, сколько страниц содержит отчет. Чтобы этот пример работал, отчет должен содержать текстовое поле, для которого свойству ControlSource присвоено выражение =Pages. Чтобы протестировать этот пример, вставьте следующий код в событие Page формы Список продуктов по алфавиту .

Dim intTotalPages As Integer 
Dim strMsg As String 
 
intTotalPages = Me.Pages 
strMsg = "This report contains " & intTotalPages & " pages." 
MsgBox strMsg

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.