印刷のタイトル行、タイトル列を設定(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ソース を実行後に「ページ設定」の「シート」タブを確認
関連記事
-
-
計算精度を設定する(PrecisionAsDisplayed プロパティ)
PrecisionAsDisplayed プロパティ PrecisionAsDi …
-
-
枠線を含めて印刷(PageSetup.PrintGridlines プロパティ)
PageSetup.PrintGridlines プロパティ PageSetup …
-
-
行列の見出しの表示・非表示(DisplayHeadings プロパティ)
DisplayHeadings プロパティ 行と列の見出しの表示・非表示を設定お …
-
-
印刷設定(ヘッダー・フッターに画像を設定)Graphic オブジェクト
Graphic オブジェクト Graphic オブジェクト は、ヘッダーおよびフ …
-
-
アクティブプリンタを変更(ActivePrinter プロパティ)
ActivePrinter プロパティ ActivePrinter プロパティを …
-
-
背景に画像を表示(SetBackgroundPicture メソッド)
SetBackgroundPicture メソッド SetBackgroundP …
-
-
ブックのファイル形式を調べる(FileFormat プロパティ)
ブックのファイル形式を調べる(FileFormat プロパティ) 指定したブック …
-
-
アクティブシートを参照する(ActiveSheet プロパティ)
アクティブなワークシートを参照する ActiveSheet プロパティを使用する …
-
-
前後のワークシートを参照する(Previous プロパティ,Next プロパティ)
Previous プロパティ 指定したシートの前(左側)のシートを参照します。 …
-
-
シート見出しの色を設定(Tab プロパティ)
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
