Document.FormattingShowFont (Word)

True : Microsoft Word affiche la mise en forme des polices dans le Volet office Styles et Mise en forme.

Sub ShowClearFormatting() 
 With ActiveDocument 
 .FormattingShowClear = False 
 .FormattingShowFilter = wdShowFilterFormattingInUse 
 .FormattingShowFont = True 
 .FormattingShowNumbering = True 
 .FormattingShowParagraph = True 
 End With 
End Sub