Word VBAでヘッダー編集モードにする

動作検証バージョン：Windows 11 Home + 64bit Word バージョン 2403（ビルド17404.20000クイック実行）ベータチャネル

「word vba ヘッダー編集モード」
といった検索キーワードでアクセスがありました。

Word VBAを使って、Wordの表示状態をヘッダーの編集モードにするには、どのようなコードを書けばいいのか探していらしたのでしょうか。

正直なところ、Word VBAでヘッダーを編集するのならばヘッダー編集モードにするのではなく、ヘッダーのRangeオブジェクトを操作するほうがイイだろうと私は思います。
ただ、ヘッダー編集モードにしたいというニーズも、あるのでしょう。

［スポンサードリンク］

ヘッダー編集モードにするサンプルプロシージャ

以下のSubプロシージャを実行すると、アクティブなページがヘッダー編集モードで表示されます。

Sub ヘッダー編集モードにする()
　With ActiveWindow.View
　　.Type = wdPrintView
　　.SeekView = wdSeekCurrentPageHeader
　End With
End Sub

WdSeekView列挙型に定義されている定数wdSeekCurrentPageHeader（実際の値は9）を指定すると、

ヘッダー編集モードになります。

ただし、元の表示状態が、
　　閲覧モード
　　Webレイアウトモード
　　アウトラインモード
　　下書きモード
といった［印刷レイアウト］ではないときに、

ActiveWindow.View.SeekView = wdSeekCurrentPageHeader

を実行すると、「実行時エラー'5894': コマンドは、印刷レイアウトモードでのみ実行できます。」エラーが発生します。そのため事前に表示モードを変更する、

ActiveWindow.View.Type = wdPrintView

を実行して、印刷レイアウトモードにしています。

逆にヘッダー編集モードを抜けて、通常のモードにするには、

ActiveWindow.View.SeekView = wdSeekMainDocument

を実行してください。

ヘッダー編集モードにする際に利用したView.SeekViewプロパティに、定数wdSeekMainDocument（実際の値は0）を指定すれば、

ヘッダー編集モードを抜けられます。

最終更新日時：2024-02-27 06:39

［スポンサードリンク］

『インストラクターのネタ帳』では、2003年10月からMicrosoft Officeの使い方などを紹介し続けています。
日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の、元になったキンドル本です↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

Excel VBAの経験がある方を対象に、Word VBAの基本をキンドル本としてまとめました↓↓

Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

「ヘッダー＆フッター」の記事一覧