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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: シートが保護されているか確認（ProtectContents プロパティ）

ProtectContents プロパティワークシートが保護されているかどうか …

: ブックのパスを取得（FullName プロパティ,Path プロパティ）

FullName プロパティ・Path プロパティブックのパス（保存場所）を調 …

: 印刷設定（ページごとに異なるヘッダー・フッターを設定）Page オブジェクト・HeaderFooter オブジェクト

Page オブジェクトページごとに異なるヘッダーおよびフッターを設定する場合、 …

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

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

: 共有ファイルを開いているユーザー情報を取得（UserStatus プロパティ）

共有ファイルを開いているユーザー情報を取得 UserStatus プロパティは、 …

: 印刷品質を設定（PageSetup.PrintQuality プロパティ）

PageSetup.PrintQuality プロパティ PageSetup.P …

: 0 を表示するかどうかを設定（DisplayZeros プロパティ）

DisplayZeros プロパティ DisplayZeros プロパティに、T …

: 印刷設定（ヘッダー／フッター）書式コード・VBAコード

印刷設定（ヘッダー／フッター）書式コード・VBAコードヘッダーおよびフッター（ …

: 前後のワークシートを参照する（Previous プロパティ,Next プロパティ)

Previous プロパティ指定したシートの前（左側）のシートを参照します。 …

: WorksheetView オブジェクト

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

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