MS Word改变与宏的背景颜色

时间:2015-12-11 11:40:00

标签: vba ms-word word-vba

我可以通过宏更改Microsoft Word 2003(2007,2010,2013)中页面的背景颜色吗?

我正在尝试创建一个Word宏(Microsoft Word 2013)来更改页面背景颜色。我开始记录击键 - 这是录制的宏:

Sub WritingLayout() 
    ActiveDocument.Background.Fill.ForeColor.RGB = RGB(255, 255, 204)    
    ActiveDocument.Background.Fill.Transparency = 0#     
    ActiveDocument.Background.Fill.PresetTextured msoTextureParchment     
End Sub 

此宏不适用于新文档。

1 个答案:

答案 0 :(得分:1)

我找到了怎么做。只需在vba代码之前添加此行:

ActiveDocument.ActiveWindow.View.DisplayBackgrounds = True

以下是整个宏:

Sub WritingLayout()
'
' WritingLayout Macro
'
    ActiveDocument.ActiveWindow.View.DisplayBackgrounds = True
    ActiveDocument.Background.Fill.ForeColor.RGB = RGB(255, 255, 204)
    ActiveDocument.Background.Fill.Transparency = 0#
    ActiveDocument.Background.Fill.PresetTextured msoTextureParchment
End Sub