Word 2007：如何在打開時設置「顯示推薦樣式」

Question

我試圖強制Word僅顯示一羣人將要使用的樣式。下面的宏只顯示我想要的樣式。但是，只有在「樣式窗格選項」對話框中的「選擇要顯示的樣式」下拉列表中選擇「推薦」時，此功能纔有效。

有沒有辦法在vba中設置它，以便在打開文檔時用戶只能看到所選的樣式？

謝謝，

d

---

公用Sub樣式集（）

' First, turn off all Style visibility: 

對於每個myStyle的在ActiveDocument.Styles mystyle.Visibility =真 接着myStyle的

個

'update the styles 

ActiveDocument.UpdateStyles

' Then, turn on the ones you want to see: 

ActiveDocument.Styles（ 「點擊」）。可見=假 ActiveDocument.Styles（ 「按鈕」）。可見=假 ActiveDocument.Styles（ 「標題」）。可見=假

'update the styles again 
ActiveDocument.UpdateStyles 

末次

Answer 1

你想.. 。？

ActiveDocument.FormattingShowFilter = wdShowFilterFormattingRecommended 
ActiveDocument.StyleSortMethod = wdStyleSortRecommended