ページの色を変更するWordマクロ

ページの背景色を変更するために、Wordマクロ（Microsoft Word Professional 10）を作成しようとしています。キーストロークを記録することから始めました-これは記録されたマクロです：

---
Sub WritingLayout()
'
' WritingLayout Macro
'
    ActiveDocument.Background.Fill.Visible = msoTrue
    ActiveDocument.Background.Fill.ForeColor.RGB = RGB(0, 43, 56)
    ActiveDocument.Background.Fill.Solid
End Sub
---

このマクロは、新しいドキュメントでは機能しません。ページの背景色が設定されると、マクロが機能します。xmlファイルを見ると、私が見つけられる唯一の違いは、ページの背景が設定された後<w:displayBackgroundShape/>、settings.xmlファイルにxml要素があることです。これがマクロの失敗の原因になりますか？もしそうなら、マクロでこれをどのように設定しますか？

microsoft-word vba macros

— ゲイリー・オニール
ソース

新しいドキュメントでは機能しないという場合、正確に何をしていますか？マクロ記録文書を閉じて開きますか？

— vembutech 14

いいえ。マクロは新しいドキュメントのデフォルトテンプレートである「Normal.dotm」に保存されます。新しいドキュメントの作成時に、マクロはページの色を変更しません。ページの色を手動で設定してから元に戻すと、マクロが機能します。

— ゲイリーオニール14

この行を追加し、印刷ビューでドキュメントを開いた状態でマクロを実行すると、settings.xml要素が挿入されます。

activedocument.ActiveWindow.View.DisplayBackgrounds = True

（記録されたコードから簡単に推測できない！）

これが答えでした-これに感謝します。

— ゲイリーオニール14