印刷のタイトル行、タイトル列を設定(PrintTitleRows,PrintTitleColumns)
PageSetup.PrintTitleRows プロパティ
PageSetup.PrintTitleRows プロパティで、タイトル行を設定すると、2ページ目移行にも設定したタイトル行が印刷されます。値の取得および設定が可能です。設定には文字列型(String)の値を使用します。
<取得>
object.PageSetup.PrintTitleRows
<設定>
object.PageSetup.PrintTitleRows = string
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- string ・・・ タイトル行を A1 形式の文字列で指定します。セル、セル範囲を指定した場合、該当するセルが含む行全体が選択されます。また、False または、空文字(“”) を指定するとタイトル行の設定は解除されます。
PageSetup.PrintTitleColumns プロパティ
PageSetup.PrintTitleColumns プロパティで、タイトル列を設定すると、2ページ目移行にも設定したタイトル列が印刷されます。値の取得および設定が可能です。設定には文字列型(String)の値を使用します。
<取得>
object.PageSetup.PrintTitleColumns
<設定>
object.PageSetup.PrintTitleColumns = string
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- string ・・・ タイトル列を A1 形式の文字列で指定します。セル、セル範囲を指定した場合、該当するセルが含む列全体が選択されます。また、False または、空文字(“”) を指定するとタイトル列の設定は解除されます。
タイトル行・列を設定する例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
Sub Sample_PrintTitle() Dim w As Worksheet Set w = ActiveSheet '行タイトルを設定「1行目から3行目」 w.PageSetup.PrintTitleRows = "$1:$3" '列タイトルを設定「2列目」 '※ セルを選択した場合、セルを含む列全体が選択されます w.PageSetup.PrintTitleColumns = "B2" End Sub |
実行結果
※ サンプルVBAソース を実行後に「ページ設定」の「シート」タブを確認
関連記事
-
ウィンドウの状態を取得・設定(WindowState プロパティ)
ウィンドウの状態を取得・設定(WindowState プロパティ) Window …
-
表示されているセル範囲を取得(VisibleRange プロパティ)
VisibleRange プロパティ 現在表示されているセル範囲(Range オ …
-
別のブックのマクロを実行(Run メソッド)
別のブックのマクロを実行 別のブックのマクロを実行するには、Run メソッド を …
-
指定したセル範囲が含まれるワークシートを参照する(Worksheet プロパティ)
Worksheet プロパティ Worksheet プロパティは、指定したセル範 …
-
選択されているシートを参照する(SelectedSheets プロパティ)
SelectedSheets プロパティ 選択されているすべてのシートをあらわす …
-
行列の見出しの表示・非表示(DisplayHeadings プロパティ)
DisplayHeadings プロパティ 行と列の見出しの表示・非表示を設定お …
-
保存時にバックアップファイルが作成されるかどうかを確認(CreateBackup プロパティ)
バックアップファイルが作成されるかどうかを確認 CreateBackup プロパ …
-
印刷設定(ヘッダー・フッターに画像を設定)Graphic オブジェクト
Graphic オブジェクト Graphic オブジェクト は、ヘッダーおよびフ …
-
シート見出しの色を設定(Tab プロパティ)
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
-
印刷位置を中央に設定(CenterHorizontally, CenterVertically)
PageSetup.CenterHorizontally プロパティ PageS …