KutoolsforOffice— 하나의 솔루션, 다섯 가지 강력한 도구。적은 노력으로 더 큰 성과。

Word 문서에서 중복 단락을 찾고 강조 표시하는 방법은 무엇입니까?

작성자Xiaoyang수정 날짜

예를 들어 수백 페이지에 달하는 대규모 Word 문서가 있고, 이 문서에 중복된 단락이 있는지 확인한 후 이를 눈에 띄게 강조 표시하여 중복 문장을 처리하고자 한다면, Word 문서에서 중복 단락을 신속하고 쉽게 어떻게 찾고 강조 표시할 수 있습니까?

VBA 코드를 사용하여 Word 문서에서 중복 단락 찾기 및 강조 표시하기


VBA 코드를 사용하여 Word 문서에서 중복 단락 찾기 및 강조 표시하기

Word 문서에서 중복 단락을 찾고 강조 표시하려면 다음 VBA 코드를 사용하면 도움이 됩니다。 아래 단계대로 진행하세요:

1.ALT + F11키를 누른 채로Microsoft Visual Basic for Applications창을 엽니다。

2。 그런 다음삽입>모듈을 클릭하고 아래 코드를 열린 빈 모듈에 복사하여 붙여넣습니다:

VBA 코드: Word 문서에서 중복 단락 찾기 및 강조 표시하기:

Sub highlightdup()
    Dim I, J As Long
    Dim xRngFind, xRng As Range
    Dim xStrFind, xStr As String
    Options.DefaultHighlightColorIndex = wdYellow
    Application.ScreenUpdating = False
    With ActiveDocument
        For I = 1 To .Paragraphs.Count - 1
            Set xRngFind = .Paragraphs(I).Range
            If xRngFind.HighlightColorIndex <> wdYellow Then
                For J = I + 1 To .Paragraphs.Count
                    Set xRng = .Paragraphs(J).Range
                    If xRngFind.Text = xRng.Text Then
                        xRngFind.HighlightColorIndex = wdBrightGreen
                        xRng.HighlightColorIndex = wdYellow
                    End If
                Next
            End If
        Next
    End With
End Sub

3。 그런 다음F5키를 눌러 이 코드를 실행합니다。 그러면 모든 중복 문장이 즉시 강조 표시되며, 처음 나타나는 중복 단락은 녹색으로, 나머지 중복 단락은 노란색으로 강조 표시됩니다。 스크린샷 참조:

모든 중복 문장이 강조 표시되며, 첫 번째로 표시된 중복 단락은 녹색으로, 다른 중복 항목은 노란색으로 강조됨

최고의 오피스 생산성 도구

Kutools for Word- 300 개 이상의 놀라운 기능으로 Word 경험을 한층 업그레이드하세요!100놀라운 기능!

🤖KUTOOLS AI 기능:AI 도우미/실시간 어시스턴트/슈퍼 폴리시(형식 유지)/슈퍼 번역(형식 유지)/AI 수정/AI 교정...

📘문서 마스터리:페이지 분할/문서 병합/다양한 형식(PDF/TXT/DOC/HTML。。。)으로 선택 항목 내보내기/일괄 PDF 변환...

콘텐츠 편집:여러 파일에서 일괄 찾기 및 바꾸기/모든 그림 크기 조정/행과 열 표 전환/표를 텍스트로 변환...

🧹손쉬운 정리: 다음과 같은 요소들을 한 번에 제거하세요여분 공백/구역 나누기/텍스트 상자/하이퍼링크/ 더 많은 제거 도구는 다음 위치에서 확인하세요제거그룹。。。

창의적 삽입: 다음 요소 삽입천 단위 구분 기호/체크 박스/라디오 버튼/QR 코드/바코드/여러 그림/ 더 많은 기능은 다음 위치에서 확인하세요삽입그룹。。。

🔍정밀 선택: 다음 요소를 정확하게 선택하세요특정 페이지//도형/제목 단락/ 더 많은선택 기능으로탐색을 강화하세요기능...

주요 강화 기능:임의 위치로 이동/반복 텍스트 자동 삽입/문서 간 전환 Windows/11 변환도구...

🌍40+개 언어 지원: Kutools 를 선호하는 언어로 사용하세요 – 영어, 스페인어, 독일어, 프랑스어, 중국어 등 40+개 추가 언어를 지원합니다!

Kutools for Word 리본 탭
 
 

Office Tab- Office 에 탭 기반 인터페이스를 도입하여 작업을 훨씬 쉽게 만듭니다

  • Word, Excel, PowerPoint, Publisher, Access, Visio 및 Project 에서 탭 기반 편집 및 읽기를 활성화합니다。
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 생성합니다。
  • 매일 수백 번의 마우스 클릭을 줄여 생산성을 50%% 향상시킵니다!

✨ Kutools for Office – 한 번의 설치로 다섯 가지 강력한 도구를 사용하세요!

포함 구성Office Tab Pro·Kutools for Excel·Kutools for Outlook·Kutools for Word·Kutools for PowerPoint

📦 하나의 스위트로 모든 5 도구 확보 | 🔗 Microsoft Office 와 원활하게 통합 | ⚡ 저장 시간하고 즉시 생산성 향상

최고의 오피스 생산성 도구

Kutools for Word- Word 용 100+ 도구