Método Range.SetRange (Word)

Define as posições de caractere inicial e final de um intervalo existente.

Sintaxe

expression. SetRange( _Start_ , _End_ )

expressão Obrigatório. Uma variável que representa um objeto Range.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Start	Obrigatório	Long	A posição de caractere inicial do intervalo.
End	Obrigatório	Long	A posição de caractere final do intervalo.

Comentários

Os valores de posição de caractere começam no início do texto, sendo 0 (zero) o primeiro valor. Todos os caracteres são contados, incluindo os não imprimíveis. Os caracteres ocultos são contados mesmo quando não são exibidos.

O método SetRange redefine as posições inicial e finais de um objeto de intervalo existente. Esse método difere o método Range, que é usado para criar um intervalo, a recebe um inicial e final posição.

Exemplo

Este exemplo usa SetRange para redefinir myRange de forma a fazer referência aos três primeiros parágrafos no documento ativo.

Set myRange = ActiveDocument.Paragraphs(1).Range 
myRange.SetRange Start:=myRange.Start, _ 
 End:=ActiveDocument.Paragraphs(3).Range.End

Este exemplo usa SetRange para redefinir myRange para se referir à área que começa no início do documento e termina no final da seleção atual.

Set myRange = ActiveDocument.Range(Start:=0, End:=0) 
myRange.InsertAfter "Hello " 
myRange.SetRange Start:=myRange.Start, End:=Selection.End

Confira também

Objeto Range

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.