여러 파일을 단어로 검색하고 바꾸는 방법은 무엇입니까?

동일한 콘텐츠 (예 : 머리글, 바닥 글, 일부 특수 단어 또는 숫자)가 포함 된 수십 개의 단어 파일이 있고 Word의 해당 문서에서 동일한 콘텐츠를 바꿔야하는 경우. 신속하게 처리하는 것이 얼마나 쉬울까요? 물론 해당 파일을 하나씩 열어 동일한 콘텐츠를 바꿀 수 있지만 시간이 많이 걸리고 번거로울 것입니다. 이 자습서는 Word의 여러 문서에서 동일한 콘텐츠를 한 번에 바꾸는 까다로운 방법을 보여줍니다.

VBA 코드를 사용하여 여러 단어 문서에서 텍스트를 동시에 찾고 바꿉니다.
Word 용 Kutools를 사용하여 여러 문서에서 동시에 다른 텍스트를 쉽게 찾고 바꿀 수 있습니다.

VBA 코드를 사용하여 여러 단어 문서에서 텍스트를 동시에 찾고 바꿉니다.

1. 프레스 다른 + F11 를 열려면 응용 프로그램 용 Microsoft Visual Basic 창.

2. 에서 응용 프로그램 용 Microsoft Visual Basic 창을 클릭합니다 끼워 넣다 > 모듈을 클릭 한 다음 다음 VBA 코드를 모듈 창에 복사합니다.

VBA 코드 : 한 번에 여러 문서에서 동일한 콘텐츠 검색 및 교체

Sub CommandButton1_Click()
'Updated by Extendoffice 20180625
Dim xFileDialog As FileDialog, GetStr(1 To 100) As String '100 files is the maximum applying this code
Dim xFindStr As String
Dim xReplaceStr As String
Dim xDoc As Document
On Error Resume Next
Set xFileDialog = Application.FileDialog(msoFileDialogFilePicker)
With xFileDialog
    .Filters.Clear
    .Filters.Add "All WORD File ", "*.docx", 1
    .AllowMultiSelect = True
    i = 1
    If .Show = -1 Then
        For Each stiSelectedItem In .SelectedItems
            GetStr(i) = stiSelectedItem
            i = i + 1
        Next
        i = i - 1
    End If
    Application.ScreenUpdating = False
    xFindStr = InputBox("Find what:", "Kutools for Word", xFindStr)
    xReplaceStr = InputBox("Replace with:", "Kutools for Word", xReplaceStr)
    For j = 1 To i Step 1
        Set xDoc = Documents.Open(FileName:=GetStr(j), Visible:=True)
        Windows(GetStr(j)).Activate
        Selection.Find.ClearFormatting
        Selection.Find.Replacement.ClearFormatting
        With Selection.Find
            .Text = xFindStr  'Find What
            .Replacement.Text = xReplaceStr  'Replace With
            .Forward = True
            .Wrap = wdFindAsk
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchByte = True
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
        Application.Run macroname:="NEWMACROS"
        ActiveDocument.Save
        ActiveWindow.Close
    Next
    Application.ScreenUpdating = True
End With
MsgBox "Operation end, please view", vbInformation
End Sub

3. 누르세요 F5 코드를 실행하는 키입니다.

4. 오프닝에서 검색 창에서 찾을 문서를 찾아 선택하고 내부 텍스트를 바꾼 다음 OK 단추. 스크린 샷보기 :

5. 첫 번째 Word 용 Kutools 대화 상자에서 문서에서 찾을 텍스트를 무엇을 찾기 상자를 클릭 한 다음 OK 버튼을 클릭합니다.

6. 두 번째 Word 용 Kutools 대화 상자에서 바꿀 텍스트를 입력하고 OK 버튼을 클릭합니다.

8. 을 클릭합니다 OK 다음 버튼 마이크로 소프트 워드 대화 상자에서 찾기 및 바꾸기를 완료합니다.

이 경우 선택한 문서의 모든 단어 "Word"가 동시에 "Excel"로 대체됩니다.

Word 용 Kutools를 사용하여 여러 문서에서 동시에 다른 텍스트를 쉽게 찾고 바꿀 수 있습니다.

여기에 적극 추천합니다 일괄 찾기 및 바꾸기 특징 Word 용 Kutools. 이 기능을 사용하면 여러 Word 문서에서 동시에 다른 텍스트를 쉽게 찾고 바꿀 수 있습니다. 이 기능을 적용하여 문서에서 텍스트를 찾고 바꾸는 방법을 살펴 보겠습니다.

Word 용 Kutools : 100 개 이상의 편리한 Word 추가 기능으로 60 일 동안 제한없이 무료 체험.

1. 클릭하십시오 쿠툴즈 플러스 > 일괄 찾기 및 바꾸기 이 기능을 사용하려면

2. 에서 일괄 찾기 및 바꾸기 대화 상자에서 다음과 같이 구성하십시오.

• 2.1) 클릭 행 추가 버튼 아래에 찾기 및 바꾸기 탭;
• 2.2) 생성 된 행 필드에서 :

• 2.3) 2.1 단계와 2.2 단계를 반복하여 찾고 바꿀 텍스트를 더 추가합니다.
• 2.4) 클릭  버튼의 파일 형식 섹션에서 텍스트를 찾고 바꿀 Word 문서를 추가합니다.
• 2.5) 클릭 교체 or 발견 단추. 스크린 샷보기 :

3. 닫기 일괄 찾기 및 바꾸기 대화 상자

이 기능에 대한 자세한 내용은 여기를 클릭하세요 ....

이 유틸리티의 무료 평가판을 받으려면 다음으로 이동하십시오. 소프트웨어 무료 다운로드 먼저 위의 단계에 따라 작업을 적용하십시오.

추천 단어 생산 도구