방법: 검색 후 선택 영역 복원

문서에서 텍스트를 찾아 바꾼 경우 검색을 완료한 다음 사용자의 원래 선택 영역을 복원해야 할 수 있습니다.

적용 대상: 이 항목의 정보는 Word 2007 및 Word 2010의 문서 수준 프로젝트 및 응용 프로그램 수준 프로젝트에 적용됩니다. 자세한 내용은 Office 응용 프로그램 및 프로젝트 형식에 따라 사용 가능한 기능을 참조하십시오.

다음 샘플 프로시저의 코드에서는 두 개의 Range 개체를 사용합니다. 한 개체에서는 현재 Selection을 저장하고 다른 개체에서는 검색에 사용할 범위를 문서 전체로 설정합니다.

검색 후에 사용자의 원래 선택 영역을 복원하려면

1. 문서와 현재 선택 영역에 대한 Range 개체를 만듭니다.

   Dim start As Word.Range = Application.Selection.Range
   Dim searchArea As Word.Range = Application.ActiveDocument.Range
   

   Word.Range start = Application.Selection.Range; 
   Word.Range searchArea = Application.ActiveDocument.Range(ref missing, ref missing); 
   

2. 검색 및 바꾸기 작업을 수행합니다.

   searchArea.Find.ClearFormatting()
   searchArea.Find.Text = "find me"
   
   searchArea.Find.Replacement.ClearFormatting()
   searchArea.Find.Replacement.Text = "Found"
   
   searchArea.Find.Execute(Replace:=Word.WdReplace.wdReplaceAll)
   

   searchArea.Find.ClearFormatting(); 
   searchArea.Find.Text = "find me"; 
   
   searchArea.Find.Replacement.ClearFormatting(); 
   searchArea.Find.Replacement.Text = "Found"; 
   
   object replaceAll = Word.WdReplace.wdReplaceAll; 
   
   searchArea.Find.Execute(
       ref missing, ref missing, ref missing, ref missing, ref missing,
       ref missing, ref missing, ref missing, ref missing, ref missing,
       ref replaceAll, ref missing, ref missing, ref missing, ref missing);
   

3. 사용자의 원래 선택 영역을 복원하기 위한 시작 범위를 선택합니다.

   start.Select()
   

   start.Select(); 
   

다음 예제에서는 전체 메서드를 보여 줍니다.

예제

Friend Sub ReplaceRestoreSelection()
    Dim start As Word.Range = Application.Selection.Range
    Dim searchArea As Word.Range = Application.ActiveDocument.Range

    searchArea.Find.ClearFormatting()
    searchArea.Find.Text = "find me"

    searchArea.Find.Replacement.ClearFormatting()
    searchArea.Find.Replacement.Text = "Found"

    searchArea.Find.Execute(Replace:=Word.WdReplace.wdReplaceAll)

    start.Select()
End Sub

internal void ReplaceRestoreSelection() 
{ 
    Word.Range start = Application.Selection.Range; 
    Word.Range searchArea = Application.ActiveDocument.Range(ref missing, ref missing); 

    searchArea.Find.ClearFormatting(); 
    searchArea.Find.Text = "find me"; 

    searchArea.Find.Replacement.ClearFormatting(); 
    searchArea.Find.Replacement.Text = "Found"; 

    object replaceAll = Word.WdReplace.wdReplaceAll; 

    searchArea.Find.Execute(
        ref missing, ref missing, ref missing, ref missing, ref missing,
        ref missing, ref missing, ref missing, ref missing, ref missing,
        ref replaceAll, ref missing, ref missing, ref missing, ref missing);

    start.Select(); 
}

참고 항목

작업

방법: 문서에서 텍스트 검색 및 바꾸기

방법: 문서에서 텍스트 검색

방법: Word에서 검색 옵션 설정

방법: 문서에서 찾은 항목 순환 검색

개념

Office 솔루션의 선택적 매개 변수