Word 문서에서 텍스트 상자로 탐색하는 3 가지 효과적인 방법

워드 솔루션 2025 년 9 월 28 일

이 기사에서는 Word 문서에서 텍스트 상자로 탐색하는 3가지 효과적인 방법을 보여드리게 되어 기쁩니다.

Word에는 선택한 개체만 찾아볼 수 있는 "개체 찾아보기 선택" 명령이 있습니다. 예를 들어 테이블 또는 페이지별로 탐색하도록 선택할 수 있습니다. 아쉽게도 텍스트 상자로 검색할 수 있는 기본 제공 기능이 없습니다. 따라서 3가지 방법을 알려드리겠습니다.

방법 1 : "Tab"키 사용

먼저 "Ctrl + Home" 키를 눌러 문서의 시작 부분으로 이동합니다.
그런 다음 첫 번째 텍스트 상자를 찾아 클릭합니다.
그런 다음 "Tab"을 눌러 다음 텍스트 상자로 이동합니다.

그건 그렇고, 이 방법은 문서에서 도형과 이미지도 찾을 수 있습니다.

방법 2: 매크로를 실행하여 한 텍스트 상자에서 다른 텍스트 상자로 이동

무엇보다 먼저 "Alt + F11" 키를 눌러 Word에서 VBA 편집기를 실행하세요.
다음으로“Normal”을 클릭하십시오.
그런 다음 "삽입"을 클릭하고 드롭다운 메뉴에서 "모듈"을 선택합니다.
두 번 클릭하여 새 모듈을 엽니 다.
이제 코딩 영역에 다음 코드를 붙여넣습니다.

Sub BrowseByTextBox()
  Dim objShape As Shape
  Dim strBoxText As String
  Dim strButtonValue As String
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.Select
      Selection.ShapeRange.TextFrame.TextRange.Select
      strBoxText = objShape.TextFrame.TextRange.Text
      strButtonValue = MsgBox("This text box contains: " & vbNewLine _
                       & strBoxText & vbNewLine & "Is this your desired text box?" _
                       & vbNewLine, vbYesNo, "Desired Text Box")
      If strButtonValue = vbYes Then
        Exit Sub
      End If
    End If
  Next objShape
End Sub

메뉴 표시줄에서 "실행" 버튼을 클릭하거나 "F5"를 눌러 코드를 실행합니다.

매크로 실행을 시작하면 아래와 같은 메시지 상자가 나타납니다.

상자에는 현재 선택된 텍스트 상자의 내용이 표시됩니다. 원하는 텍스트 상자인 경우 "예"를 클릭하여 중지할 수 있습니다. 그렇지 않으면 "아니오"를 클릭하여 다음 텍스트 상자로 이동합니다.

방법 3: 특정 텍스트 상자 찾기

문서에서 텍스트 상자의 제목을 설정하면 다음 매크로와 함께 사용하여 바로 찾을 수 있습니다.

먼저 방법 2의 단계를 참조하여 매크로를 설치하고 실행합니다.
그런 다음 매크로를 다음으로 대체해야 합니다.

Sub FindASpecificTextBox()
  Dim objShape As Shape
  Dim strBoxTitle As String
  Dim objInlineShape As InlineShape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  strBoxTitle = InputBox("Enter the title of the text box to be found here: ")
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.Select
      Selection.ShapeRange.TextFrame.TextRange.Select
      If objShape.Title = strBoxTitle Then
        Exit Sub
      End If
    End If
  Next objShape
  For Each objInlineShape In objDoc.InlineShapes
    If objInlineShape.Type = msoTextBox Then
      objInlineShape.Select
      Selection.ShapeRange.TextFrame.TextRange.Select
      If objInlineShape.Title = strBoxTitle Then
        Exit Sub
      End If
    End If
  Next objInlineShape
 
  Application.ScreenUpdating = True
End Sub

다음으로 나타나는 입력 상자에 찾고자 하는 텍스트 상자의 제목을 입력하고 "확인"을 클릭하여 진행합니다. 그러면 원하는 텍스트 상자가 선택되어 있는 것을 볼 수 있습니다.

데이터 손실에 대처

Word는 가장 많이 사용되는 소프트웨어 중 하나이므로 Word가 응답하지 않을 때 사용할 수 있는 몇 가지 요령을 알아두는 것이 필요합니다. 중요한 작업의 경우 손상된 문서, 당신의 유일한 선택은 그것을 복구하는 것입니다. 이렇게 하려면 신뢰할 수 있는 타사 도구를 신중하게 선택해야 합니다.

저자 소개 :

Vera Chen은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. 손상된 xlsx pdf 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM