Excelの印刷する先頭ページの番号を設定

<< エクセルVBAで印刷するページの余白を設定する :前の記事

こちらでは、Sheetオブジェクトに含まれるPageSetupオブジェクトFirstPageNumberプロパティを利用して、Excelの印刷する用紙サイズを設定する方法について解説しています。

プロパティとはオブジェクトの属性を指します。属性とは、そのオブジェクトの情報そのものです。プロパティはその値を取得したり、設定することもできます。プロパティを利用するにはオブジェクト名とプロパティ名の間に「.(ピリオド)」で結んで記述します。

オブジェクト名.プロパティ名

また、プロパティを設定する場合は以下のように「=(イコール)」を記述し設定値を代入します。

オブジェクト名.プロパティ名 = 設定値

目次

はじめに

こちらでは、FirstPageNumberプロパティを利用したExcelの印刷する先頭ページの番号を設定をする方法について解説します。今回は、PageSetupオブジェクトのFirstPageNumberプロパティを利用します。

利用するプロパティについて

今回利用するプロパティは以下になります。

  • FirstPageNumberプロパティ

FirstPageNumberプロパティとは

PageSetupオブジェクトのFirstPageNumberプロパティ印刷する用紙サイズを設定します。

Sheets("シート名").PageSetup.FirstPageNumber = 設定値
Sheets(インデックス番号).PageSetup.FirstPageNumber = 設定値

印刷する先頭ページの番号を設定するサンプルコード

今回のVBAコードはExcelの印刷する先頭ページの番号を設定するマクロになります。


Sub sample()

    With Sheets("Sheet1")
    
        .PageSetup.CenterFooter = "&P"
        .PageSetup.FirstPageNumber = 100
        
        .PrintOut Preview:=True
    
    End With

End Sub

実行結果

先頭ページの番号が「自動」から「100」に変更されます。

エクセルVBAのFirstPageNumberプロパティの結果1

解説

sampleプロシージャSubステートメントに引数は設定されていません。まず、Withステートメントのオブジェクト名に「Sheets("Sheet1")」を設定しました。これによりオブジェクト名を省略して記述できるようになりました。次にPageSetupオブジェクトのCenterFooterプロパティにページ番号の「&P」が設定されています。こちらは確認用の処理になります。

そして、PageSetupオブジェクトのFirstPageNumberプロパティに「100」が設定されています。これにより先頭ページ番号が「100」に変更されました。

PrintOutメソッドは先頭ページ番号が変更になったかの確認で引数Previewに「True」が設定されています。これにより印刷プレビューが表示されます。最後はEndステートメントを利用してsampleプロシージャを終了させます。

印刷する先頭ページの番号を規定値に戻すサンプルコード

今回のVBAコードはExcelの印刷する先頭ページの番号を規定値に戻すマクロになります。


Sub sample()

    With Sheets("Sheet1")
    
        .PageSetup.CenterFooter = "&P"
        .PageSetup.FirstPageNumber = xlAutomatic
        
        .PrintOut Preview:=True
    
    End With

End Sub

実行結果

先頭ページの番号が「100」から「自動」に変更されます。

エクセルVBAのFirstPageNumberプロパティの結果2

解説

先ほどは先頭ページ番号を「100」に変更しましたが、今回は先頭ページ番号を規定値に戻す方法について解説します。こちらではFirstPageNumberプロパティに「xlAutomatic」が設定されています。「xlAutomatic」は規定値になりますので、先頭ページ番号が「100」から「自動」に変更されます。

まとめ

今回は、SheetオブジェクトのFirstPageNumberプロパティを利用して、Excelの印刷する先頭ページの番号を設定する方法について解説しました。次回は、エクセルVBAで用紙のヘッダー・フッターに情報を設定する方法について解説します。

エクセルVBAの印刷設定一覧

次の記事: エクセルVBAで用紙のヘッダー・フッターに情報を設定する >>

Excel VBAでIEを思いのままに操作できるプログラミング術 Excel 2013/2010/2007/2003対応

近田 伸矢, 植木 悠二, 上田 寛

IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。

  • このエントリーをはてなブックマークに追加
ExcelのVBAについてのQ&A掲示板

↑ExcelのVBA全般について分からない事があればこちらの掲示板よりご質問ください^^

VBAのInternetExplorer操作入門

↑ExcelのVBAをマスターできたら、エクセルVBAのIE(InternetExplorer)操作にも挑戦してみてください^^

VBAのIE制御入門RSS

RSSフィードを登録すると最新記事を受け取ることができます。

VBAIE操作のスカイプレッスン

エクセルVBAのステートメント

こちらでは、エクセルVBAの事例で利用したステートメントをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

スポンサー リンク

エクセルVBAのオブジェクト

こちらでは、エクセルVBAの事例で利用したオブジェクトをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

スポンサー リンク

エクセルVBAのプロパティ

こちらでは、エクセルVBAの事例で利用したオブジェクトのプロパティをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

エクセルVBAのメソッド

こちらでは、エクセルVBAの事例で利用したオブジェクトのメソッドをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

エクセルVBAのイベント

こちらでは、エクセルVBAの事例で利用したオブジェクトのイベントをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。