Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

印刷のタイトル行、タイトル列を設定（PrintTitleRows,PrintTitleColumns）

2015/10/06

PageSetup.PrintTitleRows プロパティ

PageSetup.PrintTitleRows プロパティで、タイトル行を設定すると、２ページ目移行にも設定したタイトル行が印刷されます。値の取得および設定が可能です。設定には文字列型（String）の値を使用します。

【書式】

＜取得＞
object.PageSetup.PrintTitleRows

＜設定＞
object.PageSetup.PrintTitleRows = string

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
string ・・・タイトル行を A1 形式の文字列で指定します。セル、セル範囲を指定した場合、該当するセルが含む行全体が選択されます。また、False または、空文字(“”) を指定するとタイトル行の設定は解除されます。

PageSetup.PrintTitleColumns プロパティ

PageSetup.PrintTitleColumns プロパティで、タイトル列を設定すると、２ページ目移行にも設定したタイトル列が印刷されます。値の取得および設定が可能です。設定には文字列型（String）の値を使用します。

【書式】

＜取得＞
object.PageSetup.PrintTitleColumns

＜設定＞
object.PageSetup.PrintTitleColumns = string

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
string ・・・タイトル列を A1 形式の文字列で指定します。セル、セル範囲を指定した場合、該当するセルが含む列全体が選択されます。また、False または、空文字(“”) を指定するとタイトル列の設定は解除されます。

タイトル行・列を設定する例

サンプルVBAソース

　
Sub Sample_PrintTitle()


    Dim w As Worksheet
    Set w = ActiveSheet

    '行タイトルを設定「１行目から３行目」
    w.PageSetup.PrintTitleRows = "$1:$3"
    
    '列タイトルを設定「２列目」
    '※ セルを選択した場合、セルを含む列全体が選択されます
    w.PageSetup.PrintTitleColumns = "B2"
        

End Sub

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

'行タイトルを設定「１行目から３行目」

w.PageSetup.PrintTitleRows = "$1:$3"

'列タイトルを設定「２列目」

'※ セルを選択した場合、セルを含む列全体が選択されます

w.PageSetup.PrintTitleColumns = "B2"

End Sub

　

実行結果

※ サンプルVBAソースを実行後に「ページ設定」の「シート」タブを確認

- ブック・シートの操作 PageSetup プロパティ, PrintTitleColumns プロパティ, PrintTitleRows プロパティ, VBA基本, Worksheet オブジェクト, エクセルVBA, ブック・シートの操作, 印刷

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 印刷の先頭のページ番号を設定（PageSetup.FirstPageNumber プロパティ）

PageSetup.FirstPageNumber プロパティ PageSetu …

: ファイル保存の既定の形式を取得・設定（DefaultSaveFormat プロパティ）

DefaultSaveFormat プロパティ DefaultSaveForma …

: ウィンドウを拡大・縮小（Zoom プロパティ）

ウィンドウを拡大・縮小（Zoom プロパティ）ウィンドウの表示サイズをパーセン …

: 行列番号を含めて印刷（PageSetup.PrintHeadings プロパティ）

PageSetup.PrintHeadings プロパティ PageSetup. …

: ワークシートを参照する（Sheets プロパティ）

Sheets プロパティ Sheets プロパティは、Sheets コレクション …

: イベントの発生・無効をコントロール（EnableEvents プロパティ）

EnableEvents プロパティ EnableEvents プロパティに T …

: 数式を表示（DisplayFormulas プロパティ）

数式を表示（DisplayFormulas プロパティ）セルに数式が入力されて …

: WorksheetView オブジェクト

WorkSheetView オブジェクト行列番号や枠線の表示・非表示の設定など …

: 印刷実行前に総ページ数を取得（ExecuteExcel4Macro メソッド）

印刷の総ページ数を取得（ExecuteExcel4Macro メソッド） Exc …

: スクロール範囲を限定（ScrollArea プロパティ）

ScrollArea プロパティ ScrollArea プロパティにセル範囲を …

PREV: 印刷時のページの番号付けの方向を設定（PageSetup.Order プロパティ）
NEXT: 印刷する用紙の向きを設定（PageSetup.Orientation プロパティ）