Selection.ExtendMode (Word)

True se o modo Extend estiver ativo. Boolean de leitura/gravação.

Quando o modo Extend estiver ativo, o argumento Extend dos métodos a seguir for verdadeira por padrão: EndKey, HomeKey, MoveDown, MoveLeft, MoveRight e MoveUp. Além disso, as letras "EST" aparecem na barra de status. Essa propriedade pode ser definida somente durante o tempo de execução; tentativas defini-la no modo Immediate são ignoradas. Os argumentos Extend dos métodos StartOf e EndOf não são afetados por esta propriedade.

With Selection 
 .MoveUp Unit:=wdParagraph 
 .ExtendMode = True 
 .MoveDown Unit:=wdParagraph 
 .MoveRight Unit:=wdSentence, Count:=2 
End With