Word 문서에서 모든 구역 나누기를 빠르게 삭제하는 3 가지 방법

워드 솔루션 2025 년 9 월 28 일

이 기사에서는 Word 문서에서 모든 구역 나누기를 빠르게 삭제하는 3 가지 방법을 공유하고자합니다.

섹션 나누기는 Word 문서에서 여러 섹션을 만드는 데 유용합니다. 따라서 고유 한 스타일로 다른 섹션의 형식을 지정할 수 있습니다. 다음은 문서에 섹션 나누기를 빠르게 삽입 할 수있는 이전 문서입니다. Word 문서에 구역 나누기를 빠르게 삽입하는 3 가지 방법

그러나 스타일 변경, 섹션 다시 나누기 등과 같이 문서를 수정하는 것은 매우 일반적입니다. 특히 큰 조정이 필요한 경우 모든 섹션 나누기를 제거해야 할 수 있습니다. 다음은 섹션 나누기를 일괄 적으로 삭제하는 데 활용할 수있는 세 가지 방법입니다.

방법 1 : 문서에서 모든 구역 나누기 찾기

먼저 "Ctrl + H"를 눌러 Word에서 "찾기 및 바꾸기"상자를 엽니 다.
다음으로 "찾을 내용"텍스트 상자에 커서를 놓습니다.
더 많은 옵션을 보려면 "더보기"버튼을 클릭하십시오.
그런 다음 "Special"을 클릭하고 메뉴에서 "Section Break"를 선택합니다. 그러면 "찾을 내용"텍스트 상자에 "^ b"가 표시됩니다. 따라서 다른 방법은 2 단계 바로 뒤에“^ b”를 입력하는 것입니다.
마지막으로 "바꾸기"상자를 비워두고 "모두 바꾸기"를 클릭합니다. 확인 상자에서 "확인"을 클릭합니다.

방법 2 : 매크로를 실행하여 한 문서에서 모든 구역 나누기 삭제

원치 않는 섹션 나누기를 자동으로 제거하는 방법은 다음과 같습니다.

먼저 "Alt + F11"을 눌러 Word에서 VBA 편집기를 엽니 다.
그런 다음 "일반"을 클릭하여 새 모듈을 만듭니다.
다음으로 "삽입"을 클릭하고 "모듈"을 선택합니다.
이제 두 번 클릭하여 모듈을 엽니 다.
오른쪽의 코딩 공간에 다음 코드를 붙여 넣습니다.

Sub DeleteAllSectionsInOneDoc()
  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .ClearFormatting
      .Replacement.ClearFormatting
      .Text = "^b"
      .Replacement.Text = ""
      .Forward = True
      .Wrap = wdFindContinue
      .Format = False
      .MatchCase = False
      .MatchWholeWord = False
      .MatchWildcards = False
      .MatchSoundsLike = False
      .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
  End With
End Sub

마지막으로 "실행"을 클릭합니다.

XNUMX 초 안에 모든 섹션 나누기를 찾을 수 없습니다.

방법 3 : 여러 문서에서 모든 구역 나누기 삭제

마찬가지로 빠르고 더러운 방식으로 수행하려면 매크로를 실행해야합니다.

우선 모두 넣어 tar하나의 폴더에 문서를 가져옵니다.
그런 다음 방법 2의 단계에 따라 매크로를 설치합니다.
대신이 매크로를 실행하십시오.

Sub DeleteAllSectionBreaksInMultiDoc()
  Dim StrFolder As String
  Dim strFile As String
  Dim objDoc As Document
  Dim dlgFile As FileDialog
 
  Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
 
  With dlgFile
    If .Show = -1 Then
      StrFolder = .SelectedItems(1) & "\"
    Else
      MsgBox "No folder is selected! Please select the target folder."
      Exit Sub
    End If
  End With
 
  strFile = Dir(StrFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
 
    With Selection
      .HomeKey Unit:=wdStory
      With Selection.Find
        .ClearFormatting
        .Replacement.ClearFormatting
        .Text = "^b"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
      End With
      Selection.Find.Execute Replace:=wdReplaceAll
    End With
 
    objDoc.Save
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

다음으로 "찾아보기"창이 열리면 문서를 저장할 폴더를 선택합니다.
마지막으로 "확인"을 클릭합니다.

데이터 손실에 대비

일반적으로 좋은 운영 습관, 행운, 모든 축복으로 Word에서 많은 것을 이룰 수 있습니다. 그러나 충돌은 언제든지 당신을 때릴 수 있습니다. 따라서 정기적으로 문서를 백업하는 것이 매우 중요합니다. 백업을 손에 넣으면보다 확신을 가질 수 있습니다.tar팅 docx 수정.

저자 소개 :

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