Método Document.Range (Word)

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

Sintaxe

expressão. Intervalo (Início, Fim)

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

Parâmetros

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 para parágrafos de dois a quatro no documento ativo e, em seguida, alinha os 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.