Selection.ClearFormatting (Word)

Removes text and paragraph formatting from a selection.

Sub ClrFmtg() 
 ActiveDocument.Select 
 Selection.ClearFormatting 
End Sub