印刷のタイトル行、タイトル列を設定(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 プロパティを使用する …
-
共有ファイルを開いているユーザー情報を取得(UserStatus プロパティ)
共有ファイルを開いているユーザー情報を取得 UserStatus プロパティは、 …
-
指定したセル範囲が含まれるワークシートを参照する(Worksheet プロパティ)
Worksheet プロパティ Worksheet プロパティは、指定したセル範 …
-
並べて比較(CompareSideBySideWith,SyncScrollingSideBySide,BreakSideBySide)
並べて比較(CompareSideBySideWith メソッド) Compar …
-
選択されているシートを参照する(SelectedSheets プロパティ)
SelectedSheets プロパティ 選択されているすべてのシートをあらわす …
-
印刷品質を設定(PageSetup.PrintQuality プロパティ)
PageSetup.PrintQuality プロパティ PageSetup.P …
-
ワークシートのコピー・移動(Copy メソッド Move メソッド)
Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …
-
Excel を全画面表示(DisplayFullScreen プロパティ)
DisplayFullScreen プロパティ DisplayFullScree …
-
印刷位置を中央に設定(CenterHorizontally, CenterVertically)
PageSetup.CenterHorizontally プロパティ PageS …
-
ブックを開く(Open メソッド)
ブックを開く(Open メソッド) ブックを開くには、Workbooks コレク …