Практическое руководство. Программный сброс диапазонов в документах Word

Статья
02/20/2013

Метод SetRange предназначен для изменения размеров существующего диапазона в документе Microsoft Office Word.

Применение. Сведения этого раздела применяются к проектам уровня документа и уровня приложения для Word 2013 и Word 2010. Дополнительные сведения см. в разделе Доступность функций по типам приложений Office и проектов.

Сброс существующего диапазона

Установите в качестве исходного диапазон, включающий в себя первые семь знаков документа.

Следующий пример кода можно использовать в настройке на уровне документа.
```
Dim rng As Word.Range = Me.Range(Start:=0, End:=7)
```
```
object start = 0; 
object end = 7; 
Word.Range rng = this.Range(ref start,ref end); 
```
Приведенный ниже пример кода можно использовать в надстройке уровня приложения.В этом коде используется активный документ.
```
Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)
```
```
Word.Range rng = this.Application.ActiveDocument.Range(0, 7);
```

С помощью метода SetRange установите диапазон со второго по пятое предложение.

rng.SetRange(Start:=Me.Sentences(2).Start, End:=Me.Sentences(5).End)

rng.SetRange(this.Sentences[2].Start, this.Sentences[5].End);

Пример настройки на уровне документа

Сброс существующего диапазона в настройке на уровне документа

Ниже приведен полный пример настройки на уровне документа.Чтобы использовать этот код, запустите его из класса ThisDocument проекта.

Dim rng As Word.Range = Me.Range(Start:=0, End:=7)

' Reset the existing Range.
rng.SetRange(Start:=Me.Sentences(2).Start, End:=Me.Sentences(5).End)
rng.Select()

object start = 0; 
object end = 7; 
Word.Range rng = this.Range(ref start,ref end); 

// Reset the existing Range. 
rng.SetRange(this.Sentences[2].Start, this.Sentences[5].End); 
rng.Select();

Пример надстройки уровня приложения

Сброс существующего диапазона в надстройке уровня приложения

Ниже приведен полный пример надстройки уровня приложения.Чтобы использовать этот код, запустите его из класса ThisAddIn проекта.

Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)

' Reset the existing Range.
rng.SetRange(Start:=Me.Application.ActiveDocument.Sentences(2).Start, _
    End:=Me.Application.ActiveDocument.Sentences(5).End)
rng.Select()

Word.Range rng = this.Application.ActiveDocument.Range(0, 7);

// Reset the existing Range. 
rng.SetRange(this.Application.ActiveDocument.Sentences[2].Start,
    this.Application.ActiveDocument.Sentences[5].End);
rng.Select();

См. также

Задачи

Практическое руководство. Программное расширение диапазонов в документах

Практическое руководство. Программное определение и выделение диапазонов в документах

Практическое руководство. Программное извлечение символов начала и завершения в диапазонах

Практическое руководство. Программное свертывание диапазонов и выделений в документах

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