Document.WebOptions (Word)

Returns the WebOptions object, which contains document-level attributes used by Microsoft Word when you save a document as a webpage or open a webpage.

Set objWO = ActiveDocument.WebOptions 
objWO.RelyOnCSS = True 
objWO.Encoding = msoEncodingWestern