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

関連記事

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

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

: 白黒印刷（PageSetup.BlackAndWhite プロパティ）

PageSetup.BlackAndWhite プロパティ PageSetup. …

: 新しいウィンドウを開く（NewWindow メソッド）

NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …

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

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

: ブックを参照（Workbooks プロパティ,Windows プロパティ）

アクティブなワークブックを参照現在使用中のワークブック、複数ある場合は一番手前 …

: ブック作成時のシート数の取得・設定（SheetsInNewWorkbook プロパティ）

SheetsInNewWorkbook プロパティ Excel で新規ブックに自 …

: 分割したウィンドウの取得（Panes コレクション,Pane オブジェクト）

分割したウィンドウ「ウィンドウ枠の固定」や「ウィンドウの分割」での、すべての領 …

: 再計算（Calculation, EnableCalculation, Calculate）

ワークブックやシートの再計算通常、Excel では、自動的に再計算が行われる設 …

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

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

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

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

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