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

関連記事

: 印刷のタイトル行、タイトル列を設定（PrintTitleRows,PrintTitleColumns）

PageSetup.PrintTitleRows プロパティ PageSetup …

: 印刷の用紙サイズを設定（PageSetup.PaperSize プロパティ）

PageSetup.PaperSize プロパティ PageSetup.Pape …

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

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

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

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

: 指定したセル範囲が含まれるワークシートを参照する（Worksheet プロパティ）

Worksheet プロパティ Worksheet プロパティは、指定したセル範 …

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

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

: 印刷の先頭のページ番号を設定（PageSetup.FirstPageNumber プロパティ）

PageSetup.FirstPageNumber プロパティ PageSetu …

: ウィンドウを拡大・縮小（Zoom プロパティ）

ウィンドウを拡大・縮小（Zoom プロパティ）ウィンドウの表示サイズをパーセン …

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

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

: ブックが互換モードで開いているか確認する（Excel8CompatibilityMode プロパティ）

ブックが互換モードで開いているか確認する Excel8Compatibility …

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