Método Document.Range (Word)

Retorna um objeto Range usando as posições dos caracteres iniciais e finais.

Sintaxe

expressão. Intervalo (Iniciar, Terminar)

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

Parâmetros

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

Valor de retorno

Intervalo

Exemplo

Este exemplo aplica formatação com negrito aos 10 primeiros caracteres do documento ativo.

Sub DocumentRange() 
 ActiveDocument.Range(Start:=0, End:=10).Bold = True 
End Sub

Este exemplo cria um intervalo que começa no início do documento ativo e termina na posição do cursor, e depois muda todos os caracteres dentro desse intervalo para maiúsculos.

Sub DocumentRange2() 
 Dim r As Range 
 Set r = ActiveDocument.Range(Start:=0, End:=Selection.End) 
 r.Case = wdUpperCase 
End Sub

Este exemplo cria e define a variável myRange como parágrafos de dois a quatro no documento ativo e, em seguida, ele alinha com o botão direito dos parágrafos no intervalo.

Sub DocumentRange3() 
 Dim aDoc As Document 
 Dim myRange As Range 
 Set aDoc = ActiveDocument 
 If aDoc.Paragraphs.Count >= 6 Then 
 Set myRange = aDoc.Range(aDoc.Paragraphs(2).Range.Start, _ 
 aDoc.Paragraphs(4).Range.End) 
 myRange.Paragraphs.Alignment = wdAlignParagraphRight 
 End If 
End Sub

Confira também

Objeto Document

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.