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

印刷設定（ヘッダーに文字列を指定）LeftHeader,CenterHeader,RightHeader

2015/10/15

PageSetup.LeftHeader プロパティ

PageSetup.LeftHeader プロパティを使用して、左ヘッダーの文字列を取得または設定します。

【書式】

＜取得＞
object.PageSetup.LeftHeader

＜設定＞
object.PageSetup.LeftHeader = string

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
string ・・・文字列、VBAコードなどを指定します。ヘッダーの書式は、書式コードを使用して設定します。VBAコード、書式コードは、印刷設定（ヘッダー／フッター）書式コード・VBAコードを参照してください。

PageSetup.RightHeader プロパティ

PageSetup.RightHeader プロパティを使用して、右ヘッダーの文字列を取得または設定します。

【書式】

＜取得＞
object.PageSetup.RightHeader

＜設定＞
object.PageSetup.RightHeader = string

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
string ・・・文字列、VBAコードなどを指定します。ヘッダーの書式は、書式コードを使用して設定します。VBAコード、書式コードは、印刷設定（ヘッダー／フッター）書式コード・VBAコードを参照してください。

PageSetup.CenterHeader プロパティ

PageSetup.CenterHeader プロパティを使用して、ヘッダー中央の文字列を取得または設定します。

【書式】

＜取得＞
object.PageSetup.CenterHeader

＜設定＞
object.PageSetup.CenterHeader = string

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
string ・・・文字列、VBAコードなどを指定します。ヘッダーの書式は、書式コードを使用して設定します。VBAコード、書式コードは、印刷設定（ヘッダー／フッター）書式コード・VBAコードを参照してください。

ヘッダーに文字列を設定する

サンプルVBAソース

　
Sub Sample_HeaderFooter01()

    Dim w As Worksheet
    Set w = ActiveSheet
    
    With w.PageSetup
    
        
        '左ヘッダーの設定（文字列「左ヘッダー」フォント「メイリオ」「斜体」）
        .LeftHeader = "&""メイリオ""&I左ヘッダー"

        '中央ヘッダーの設定
        .CenterHeader = "&P / &N ページ"

        '右ヘッダーの設定
        .RightHeader = "&18&K0000FF右ヘッダー"

    
    End With
    
    w.PrintPreview

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

　

Sub Sample_HeaderFooter01()

Dim w As Worksheet

Set w = ActiveSheet

With w.PageSetup

'左ヘッダーの設定（文字列「左ヘッダー」フォント「メイリオ」「斜体」）

.LeftHeader = "&""メイリオ""&I左ヘッダー"

'中央ヘッダーの設定

.CenterHeader = "&P / &N ページ"

'右ヘッダーの設定

.RightHeader = "&18&K0000FF右ヘッダー"

End With

w.PrintPreview

End Sub

　

実行結果

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

Tweet

Message コメントをキャンセル

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

関連記事

: ページ数に合わせて印刷（FitToPagesTall, FitToPagesWide）

PageSetup.FitToPagesTall プロパティ PageSetup …

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

DefaultSaveFormat プロパティ DefaultSaveForma …

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

PageSetup.PrintHeadings プロパティ PageSetup. …

: ワークブックを保護・保護を解除（Protect メソッド・Unprotect メソッド）

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

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

PrecisionAsDisplayed プロパティ PrecisionAsDi …

: ブックが共有モードか確認する（MultiUserEditing プロパティ）

ブックが共有モードか確認する（MultiUserEditing プロパティ）共 …

: 印刷設定（ヘッダー・フッターに画像を設定）Graphic オブジェクト

Graphic オブジェクト Graphic オブジェクトは、ヘッダーおよびフ …

: 印刷時のページの番号付けの方向を設定（PageSetup.Order プロパティ）

PageSetup.Order プロパティ PageSetup.Order プロ …

: セルのコメントを印刷（PageSetup.PrintComments プロパティ）

PageSetup.PrintComments プロパティ PageSetup. …

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

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

PREV: 印刷設定（ヘッダー／フッター）書式コード・VBAコード
NEXT: 印刷設定（フッターに文字列を指定）LeftFooter,CenterFooter,RightFooter