印刷のタイトル行、タイトル列を設定(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ソース を実行後に「ページ設定」の「シート」タブを確認
関連記事
-
-
アクティブシートを参照する(ActiveSheet プロパティ)
アクティブなワークシートを参照する ActiveSheet プロパティを使用する …
-
-
ワークシートをアクティブにする・選択する(Activate, Select)
Activate メソッド・Select メソッド Activate メソッドは …
-
-
印刷時の改ページ設定(Add,ResetAllPageBreaks)
改ページの追加と解除 印刷時に改ページを指定するには、HPageBreaks コ …
-
-
指定したセル範囲が含まれるワークシートを参照する(Worksheet プロパティ)
Worksheet プロパティ Worksheet プロパティは、指定したセル範 …
-
-
シート見出しの色を設定(Tab プロパティ)
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
-
-
0 を表示するかどうかを設定(DisplayZeros プロパティ)
DisplayZeros プロパティ DisplayZeros プロパティに、T …
-
-
イベントの発生・無効をコントロール(EnableEvents プロパティ)
EnableEvents プロパティ EnableEvents プロパティに T …
-
-
印刷の用紙サイズを設定(PageSetup.PaperSize プロパティ)
PageSetup.PaperSize プロパティ PageSetup.Pape …
-
-
ブックを開く(Open メソッド)
ブックを開く(Open メソッド) ブックを開くには、Workbooks コレク …
-
-
前後のワークシートを参照する(Previous プロパティ,Next プロパティ)
Previous プロパティ 指定したシートの前(左側)のシートを参照します。 …