印刷の先頭のページ番号を設定（PageSetup.FirstPageNumber プロパティ）
PageSetup.FirstPageNumber プロパティ
PageSetup.FirstPageNumber プロパティで、印刷するシートの先頭ページのページ番号を設定することができます。値の取得および設定が可能です。長整数型（Long）の値を使用します。
【書式】
＜取得＞
object.PageSetup.FirstPageNumber
＜設定＞
object.PageSetup.FirstPageNumber = long
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- long ・・・ 印刷時、先頭ページのページ番号を長整数型（Long）の値を指定します。定数 xlAutomatic を指定すると、自動的に先頭ページの番号が選択されます。規定値は、xlAutomatic です。
PageSetup.FirstPageNumber プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
Sub Sample_FirstPageNumber() Dim w As Worksheet Set w = ActiveSheet 'ヘッダー中央にページ番号を表示 w.PageSetup.CenterHeader = "&P" '先頭ページのページ番号を「100」に指定 w.PageSetup.FirstPageNumber = 100 '印刷プレビューを表示 w.PrintPreview End Sub |
実行結果
関連記事
-
-
ワークシートをアクティブにする・選択する（Activate, Select）
Activate メソッド・Select メソッド Activate メソッドは …
-
-
ブックが互換モードで開いているか確認する（Excel8CompatibilityMode プロパティ）
ブックが互換モードで開いているか確認する Excel8Compatibility …
-
-
印刷の用紙サイズを設定（PageSetup.PaperSize プロパティ）
PageSetup.PaperSize プロパティ PageSetup.Pape …
-
-
シート見出しの色を設定（Tab プロパティ）
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
-
-
ステータスバーにメッセージを表示（StatusBar プロパティ）
StatusBar プロパティ StatusBar プロパティで、ステータスバー …
-
-
最近使用したファイル（RecentFile オブジェクト,RecentFiles コレクション）
最近使用したファイル（RecentFile オブジェクト,RecentFiles …
-
-
ワークシートを参照する（Sheets プロパティ）
Sheets プロパティ Sheets プロパティは、Sheets コレクション …
-
-
ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）
Paste メソッド 指定したワークシート上にクリップボードのデータを貼り付けま …
-
-
印刷設定（ヘッダー・フッターに画像を設定）Graphic オブジェクト
Graphic オブジェクト Graphic オブジェクト は、ヘッダーおよびフ …
-
-
印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin
余白を設定する 余白を設定する単位は、pt（ポイント：約 0.03528 cm） …