印刷のタイトル行、タイトル列を設定(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ソース を実行後に「ページ設定」の「シート」タブを確認
関連記事
-
-
印刷設定(ページごとに異なるヘッダー・フッターを設定)Page オブジェクト・HeaderFooter オブジェクト
Page オブジェクト ページごとに異なるヘッダーおよびフッターを設定する場合、 …
-
-
別のブックのマクロを実行(Run メソッド)
別のブックのマクロを実行 別のブックのマクロを実行するには、Run メソッド を …
-
-
再計算(Calculation, EnableCalculation, Calculate)
ワークブックやシートの再計算 通常、Excel では、自動的に再計算が行われる設 …
-
-
画面の上端・左端を設定(ScrollRow プロパティ、ScrollColumn プロパティ)
画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …
-
-
ワークシートの非表示・再表示(Visible プロパティ)
ワークシートの表示・非表示 ワークシートを非表示にしたり、非表示にしたワークシー …
-
-
ブックを閉じる(Close メソッド)
ブックを閉じる(Close メソッド) Close メソッド で、ブックを閉じる …
-
-
ステータスバーにメッセージを表示(StatusBar プロパティ)
StatusBar プロパティ StatusBar プロパティで、ステータスバー …
-
-
印刷位置を中央に設定(CenterHorizontally, CenterVertically)
PageSetup.CenterHorizontally プロパティ PageS …
-
-
新規ブック作成(Add メソッド)
新規にワークブックを作成する Workbooks コレクションの Add メソッ …
-
-
計算精度を設定する(PrecisionAsDisplayed プロパティ)
PrecisionAsDisplayed プロパティ PrecisionAsDi …
