Selection.StartIsActive (Word)
True se o início da seleção estiver ativo. Boolean de leitura/gravação.
Se a seleção não estiver recolhida para um ponto de inserção, o início ou o final da seleção está ativo. A extremidade ativa da seleção é movida quando você chama os seguintes métodos: EndKey, Extend (com o argumento characters), Homekey, MoveDown, MoveLeft, MoveRight e moveUp. Essa propriedade é equivalente ao uso da propriedade Flags com a constante wdSelStartActive. No entanto, usando a propriedade Flags requer operações binárias, que são mais complicadas que usa a propriedade StartIsActive.
With Selection
.StartIsActive = False
.MoveRight Unit:=wdWord, Count:=2, Extend:=wdExtend
End With