次の方法で共有


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 のサポートおよびフィードバックを参照してください。