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

関連記事

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

PageSetup.BlackAndWhite プロパティ PageSetup. …

: 枠線を含めて印刷（PageSetup.PrintGridlines プロパティ）

PageSetup.PrintGridlines プロパティ PageSetup …

: 印刷の倍率（拡大／縮小）（PageSetup.Zoom プロパティ）

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

: ブック・シートの名前を取得・設定（Name プロパティ）

ワークブックの名前を取得 Name プロパティで、ワークブックの名前を取得します …

: 印刷設定（フッターに画像を指定）LeftFooterPicture,CenterFooterPicture,RightFooterPicture

フッターに画像を表示するには LeftFooterPicture プロパティ、C …

: 別のブックのマクロを実行（Run メソッド）

別のブックのマクロを実行別のブックのマクロを実行するには、Run メソッドを …

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

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

: シート見出しの色を設定（Tab プロパティ）

シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …

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

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

: ブックを別名で保存（SaveAs メソッド）

ブックを別名で保存（SaveAs メソッド）ブックの変更を保存したり、新規ブッ …

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