☰

Word宏改变页面颜色

tag-icon • tag-icon microsoft-word vba macros
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 元素。这可能是宏失败的原因吗？如果是，我该如何在宏中设置它？

答案1

添加此行并在打印视图中打开文档的情况下运行宏会插入 settings.xml 元素：

activedocument.ActiveWindow.View.DisplayBackgrounds = True

（从记录的代码中不容易推断！）

相关内容