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