Метод Document.Range (Word)

Статья
04/07/2023

Возвращает объект Range с использованием указанной начальной и конечной позиций символов.

Синтаксис

expression. Диапазон (начало, конец)

выражение (обязательно). Переменная, представляющая объект Document .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Start	Необязательный	Variant	Начальная позиция символа.
End	Необязательный	Variant	Конечная позиция символа.

Возвращаемое значение

Диапазон

Пример

В этом примере к первым 10 символам активного документа применяется полужирное форматирование.

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

В этом примере создается диапазон, который начинается в начале активного документа и заканчивается в позиции курсора, а затем изменяет все символы в этом диапазоне на верхний регистр.

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

В этом примере создается и устанавливается переменная myRange для абзацев 2–четыре в активном документе, а затем она выравнивает абзацы в диапазоне по правому краю.

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

См. также

Объект Document

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через