web-dev-qa-db-ja.com

ページの色を変更する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ファイルを見ると、私が見つけることができる唯一の違いは、ページの背景が設定された後、settings.xmlファイルにxml要素<w:displayBackgroundShape/>があることです。これがマクロ障害の原因でしょうか？もしそうなら、どうすればこれをマクロに設定できますか？

microsoft-wordvbamacros
3
Gary O'Neal

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

activedocument.ActiveWindow.View.DisplayBackgrounds = True

（記録されたコードから簡単に推測することはできません！）

3
user181946