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

関連記事

: 数式を表示（DisplayFormulas プロパティ）

数式を表示（DisplayFormulas プロパティ）セルに数式が入力されて …

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

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

: 画面の上端・左端を設定（ScrollRow プロパティ、ScrollColumn プロパティ）

画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …

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

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

: ブックの表示・非表示（Visible プロパティ）

ブック表示・非表示（Visible プロパティ）ブック（ウィンドウ）が表示され …

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

PageSetup.PrintTitleRows プロパティ PageSetup …

: ウィンドウ枠の固定（FreezePanes プロパティ、SplitColumn プロパティ,SplitRow プロパティ）

ウィンドウ枠の固定と解除ウィンドウ枠を固定するには FreezePanes プ …

: 共有ファイルを開いているユーザー情報を取得（UserStatus プロパティ）

共有ファイルを開いているユーザー情報を取得 UserStatus プロパティは、 …

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

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

: 印刷位置を中央に設定（CenterHorizontally, CenterVertically）

PageSetup.CenterHorizontally プロパティ PageS …

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