Range.Expand (Word)

Expande o intervalo ou seleção especificada. Retorna o número de caracteres adicionados ao intervalo ou seleção.

Expand (Unit)

Unit: A unidade pela qual expandir o intervalo. Pode ser uma das seguintes constantes WdUnits : wdCharacter, wdWord, wdSentence, wdParagraph, wdSection, wdStory, wdCell wdColumn, wdRowou **wdTable **.

Set myRange = ActiveDocument.Words(1) 
myRange.Expand Unit:=wdParagraph