방법: 문서에서 범위 확장

아티클
04/28/2010

업데이트: 2007년 11월

적용 대상
이 항목의 정보는 Microsoft Office의 지정된 Visual Studio Tools for Office 프로젝트 및 버전에만 적용됩니다. 프로젝트 형식 문서 수준 프로젝트 응용 프로그램 수준 프로젝트 Microsoft Office 버전 Word 2003 Word 2007 자세한 내용은 응용 프로그램 및 프로젝트 형식에 따라 사용 가능한 기능을 참조하십시오.

이 항목의 정보는 Microsoft Office의 지정된 Visual Studio Tools for Office 프로젝트 및 버전에만 적용됩니다.

프로젝트 형식

문서 수준 프로젝트
응용 프로그램 수준 프로젝트

Microsoft Office 버전

Word 2003
Word 2007

자세한 내용은 응용 프로그램 및 프로젝트 형식에 따라 사용 가능한 기능을 참조하십시오.

Microsoft Office Word 문서에서 Range 개체를 정의한 후 MoveStart 및 MoveEnd 메서드를 사용하여 해당 개체의 시작점과 끝점을 변경합니다. MoveStart 메서드와 MoveEnd 메서드는 Unit 및 Count라는 두 개의 인수를 동일하게 사용합니다. Count 인수는 이동할 단위 수이고, Unit 인수는 다음 WdUnits 값 중 하나가 될 수 있습니다.

다음 예제에서는 일곱 개의 문자로 구성된 범위를 정의합니다. 그런 다음 범위의 시작 위치를 원래 시작 위치에서 일곱 문자 뒤로 이동합니다. 범위의 끝 위치는 변경된 시작 위치와 마찬가지로 원래 시작 위치에서 일곱 문자 뒤에 있으므로 범위를 변경한 결과에는 문자가 포함되지 않습니다. 그런 다음 이 코드에서는 끝 위치를 현재 끝 위치에서 일곱 문자 뒤로 이동합니다.

범위를 확장하려면

문자의 범위를 정의합니다. 자세한 내용은 방법: 문서 내의 범위 정의 및 선택을 참조하십시오.

다음 코드 예제는 문서 수준 사용자 지정에 사용할 수 있습니다.
```
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)
```
```
object start = 0;
object end = 7;
Word.Range rng = this.Application.ActiveDocument.Range(
    ref start, ref end);
```

Range 개체의 MoveStart 메서드를 사용하여 범위의 시작 위치를 옮깁니다.

rng.MoveStart(Unit:=Word.WdUnits.wdCharacter, Count:=7)

object unit = Word.WdUnits.wdCharacter;
object count = 7;
rng.MoveStart(ref unit, ref count);

Range 개체의 MoveEnd 메서드를 사용하여 범위의 끝 위치를 옮깁니다.

rng.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=7)

unit = Word.WdUnits.wdCharacter;
count = 7;
rng.MoveEnd(ref unit, ref count);

문서 수준 사용자 지정 코드

문서 수준 사용자 지정의 범위를 확장하려면

다음 예제에서는 문서 수준 사용자 지정의 전체 코드를 보여 줍니다. 이 코드를 사용하려면 프로젝트의 ThisDocument 클래스에서 이 코드를 실행하십시오.

' Define a range of 7 characters.
Dim rng As Word.Range = Me.Range(Start:=0, End:=7)

' Move the start position 7 characters.
rng.MoveStart(Unit:=Word.WdUnits.wdCharacter, Count:=7)

' Move the end position 7 characters.
rng.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=7)

// Define a range of 7 characters.
object start = 0;
object end = 7;
Word.Range rng = this.Range(ref start, ref end);

// Move the start position 7 characters.
object unit = Word.WdUnits.wdCharacter;
object count = 7;
rng.MoveStart(ref unit, ref count);

// Move the end position 7 characters.
unit = Word.WdUnits.wdCharacter;
count = 7;
rng.MoveEnd(ref unit, ref count);

응용 프로그램 수준 추가 기능 코드

응용 프로그램 수준 추가 기능의 범위를 확장하려면

다음 예제에서는 응용 프로그램 수준 추가 기능의 전체 코드를 보여 줍니다. 이 코드를 사용하려면 프로젝트의 ThisAddIn 클래스에서 이 코드를 실행하십시오.

' Define a range of 7 characters.
Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)

' Move the start position 7 characters.
rng.MoveStart(Unit:=Word.WdUnits.wdCharacter, Count:=7)

' Move the end position 7 characters.
rng.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=7)

// Define a range of 7 characters.
object start = 0;
object end = 7;
Word.Range rng = this.Application.ActiveDocument.Range(
    ref start, ref end);

// Move the start position 7 characters.
object unit = Word.WdUnits.wdCharacter;
object count = 7;
rng.MoveStart(ref unit, ref count);

// Move the end position 7 characters.
unit = Word.WdUnits.wdCharacter;
count = 7;
rng.MoveEnd(ref unit, ref count);