페이지 색상을 변경하는 단어 매크로

페이지 배경색을 변경하기 위해 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

아니요. 매크로는 새 문서의 기본 템플릿 인 'Normal.dotm'에 저장됩니다. 새 문서를 만들 때 매크로는 페이지 색상을 변경하지 않습니다. 페이지 색상을 수동으로 설정 한 다음 다시 변경하면 매크로가 작동합니다.

— Gary O'Neal

이 줄을 추가하고 인쇄보기에서 문서를 연 상태에서 매크로를 실행하면 settings.xml 요소가 삽입됩니다.

activedocument.ActiveWindow.View.DisplayBackgrounds = True

(기록 된 코드에서 쉽게 추론되지 않습니다!)

이것이 답입니다. 감사합니다.

— Gary O'Neal