Document.WebOptions (Word)

Retorna o objeto WebOptions , que contém atributos no nível do documento usados pelo Microsoft Word quando você salva um documento como uma página da Web ou abre uma página da Web. Somente leitura.

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