Selection.TypeText (Word)

Insere o texto especificado.

Se a propriedade ReplaceSelection for True, a seleção será substituída pelo texto especificado. Se ReplaceSelection for False, o texto especificado será inserido antes da seleção.

TypeText (Text)

Text: O texto a ser inserido.

If Options.ReplaceSelection = True Then 
 Selection.Collapse Direction:=wdCollapseStart 
 Selection.TypeText Text:="Hello" 
End If