Propriedade Selection.StartIsActive (Word)

True se o início da seleção estiver ativo. Boolean de leitura/gravação.

Sintaxe

expression. StartIsActive

Expressão Uma expressão que retorna um objeto Selection .

Comentários

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. O final ativo da seleção move quando você chama os métodos a seguir: EndKey, Extend (com o argumento de caracteres), 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.

Exemplo

Este exemplo estende a seleção atual através das próximas duas palavras. Para certificar-se de que qualquer texto selecionado atualmente fique selecionado durante a extensão, o final da seleção é feito ativo pela primeira vez. (Por exemplo, se as três primeiras palavras deste parágrafo foram marcadas, mas o início da seleção foram ativo, a chamada do método MoveRight seria cancelar a seleção das duas primeiras palavras.)

With Selection 
 .StartIsActive = False 
 .MoveRight Unit:=wdWord, Count:=2, Extend:=wdExtend 
End With

Aqui está o mesmo exemplo usando a propriedade Flags. Essa solução é problemática porque você só pode desativar uma configuração de propriedade Flags pelo sobrescrevê-lo com um valor não relacionado.

With Selection 
 If (.Flags And wdSelStartActive) = wdSelStartActive Then _ 
 .Flags = wdSelReplace 
 .MoveRight Unit:=wdWord, Count:=2, Extend:=wdExtend 
End With

Aqui está o mesmo exemplo usando o método MoveEnd, o que elimina a necessidade de verificar qual final da seleção está ativa.

With Selection 
 .MoveEnd Unit:=wdWord, Count:=2 
End With

Confira também

Objeto Selection

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.