Document.FormattingShowClear (Word)
True for Microsoft Word to show clear formatting in the Styles and Formatting task pane.
Sub ShowClearFormatting()
With ActiveDocument
.FormattingShowClear = False
.FormattingShowFilter = wdShowFilterFormattingInUse
.FormattingShowFont = True
.FormattingShowNumbering = True
.FormattingShowParagraph = True
End With
End Sub