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

関連記事

: 新規ブック作成（Add メソッド）

新規にワークブックを作成する Workbooks コレクションの Add メソッ …

: 印刷設定（ヘッダーに画像を指定）LeftHeaderPicture, CenterHeaderPicture, RightHeaderPicture

ヘッダーに画像を表示するには LeftHeaderPicture プロパティ、C …

: シートを保護・保護したシートを解除する（Protect メソッド・Unprotect メソッド）

Protect メソッド・Unprotect メソッド Protect メソッド …

: 印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage

偶数ページに別のヘッダーおよびフッターを設定偶数ページのヘッダーおよびフッター …

: 印刷時の改ページ設定（Add,ResetAllPageBreaks）

改ページの追加と解除印刷時に改ページを指定するには、HPageBreaks コ …

: ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）

Paste メソッド指定したワークシート上にクリップボードのデータを貼り付けま …

: ウィンドウのタイトル（Window.Caption プロパティ）

ウィンドウのタイトル（Caption プロパティ） Windows.Captio …

: ワークシートの数を数える（Count プロパティ）

Count プロパティ指定したWorksheets コレクションやSheets …

: 計算精度を設定する（PrecisionAsDisplayed プロパティ）

PrecisionAsDisplayed プロパティ PrecisionAsDi …

: 行列の見出しの表示・非表示（DisplayHeadings プロパティ）

DisplayHeadings プロパティ行と列の見出しの表示・非表示を設定お …

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