印刷の先頭のページ番号を設定(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) …
