Método Document.Range (Word)

Devuelve un objeto Range con el de inicio especificado y terminando posiciones de carácter.

Sintaxis

expresión. Intervalo (Inicio, Fin)

expresión requerida. Variable que representa un objeto Document.

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Start	Opcional	Variant	Posición del carácter inicial.
End	Opcional	Variant	Posición del carácter final.

Valor devuelto

Rango

Ejemplo

En este ejemplo se aplica formato de negrita a los 10 primeros caracteres del documento activo.

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

En este ejemplo se crea un intervalo que se inicia al principio del documento activo y termina en la posición del cursor y, a continuación, se cambian todos los caracteres dentro de ese intervalo a mayúsculas.

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

En este ejemplo se crea y establece la variable myRange en párrafos de dos a cuatro del documento activo y, a continuación, se alinean a la derecha los párrafos del 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

Vea también

Objeto Document

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.