Método Range.MoveStartUntil (Word)
Move a posição inicial do intervalo especificado até um dos caracteres especificados ser localizado no documento.
Sintaxe
expression. MoveStartUntil
( _Cset_
, _Count_
)
expressão Obrigatório. Uma variável que representa um objeto Range.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Cset | Obrigatório | Variant | Um ou mais caracteres. Esse argumento é sensível a casos. |
Count | Opcional | Variant | O número máximo de caracteres pelo qual o intervalo especificado deve ser movido. Pode ser um número ou o wdForward ou wdBackward constante. Se Count for um número positivo, o intervalo será movido para frente no documento. Se for um número negativo, o intervalo é movido para trás. O valor padrão é wdForward. |
Comentários
Se o movimento for para trás no documento, o intervalo será expandido.
Esse método retorna o número de caracteres pelos quais a posição inicial do intervalo especificado movida, como um valor Long. Se Count for maior do que 0 (zero), esse método retorna o número de caracteres movidos mais 1. Se Count for menor que 0 (zero), esse método retorna o número de caracteres movidos menos 1. Se nenhum caractere Cset forem encontrada, o intervalo especificado não será alterado e o método retornará 0 (zero). Se a posição inicial for movida para frente até um ponto além da posição final, o intervalo estiver recolhido, e ambas as posições de início e término serão movidas juntas.
Exemplo
Se existir um caractere cifrão ($) no primeiro parágrafo do texto selecionado, este exemplo moverá myRange para exatamente antes do cifrão.
Set myRange = Selection.Paragraphs(1).Range
leng = myRange.End - myRange.Start
myRange.Collapse Direction:=wdCollapseStart
myRange.MoveStartUntil Cset:="$", Count:=leng
Confira também
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.