Report.Pages プロパティ (Access)
ページ番号をレポートに印刷するために必要な情報を返すには、 Pages プロパティを使用します。 値の取得および設定が可能です。整数型 (Integer) の値を使用します。
構文
式。ページ
式Report オブジェクトを表す変数。
注釈
このプロパティは、印刷プレビューまたは印刷時にのみ適用されます。
マクロまたは Visual Basic で Pages プロパティを参照する場合、" ControlSource /コントロールソース" プロパティに Pages プロパティを使用した式が設定されたテキスト ボックスがフォームやレポートに含まれている必要があります。 たとえば、ページ フッターのテキスト ボックスの " ControlSource /コントロールソース" プロパティに次の式を設定できます。
式 | 印刷内容 |
---|---|
=Page | ページ フッター内にページ番号 (たとえば、1、2、3)。 |
="Page" & ページ & "of" & Pages | ページ フッター内に "Page n of nn" (たとえば、Page 1 of 5、Page 2 of 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 のサポートおよびフィードバックを参照してください。