Word 문서에서 여러 책갈피를 일괄 삭제하는 2 가지 빠른 방법

이 기사에서는 Word 문서에서 여러 책갈피를 일괄 삭제하는 두 가지 빠른 방법을 제공하고자합니다.

일반적으로 장애물없이 Word 문서에서 단일 책갈피를 추가하거나 삭제할 수 있습니다. 그러나 책갈피가 여러 개인 경우 손이 묶여 있다고 느낄 수 있습니다.

다행히 Word에는 VBA 편집기 인 강력한 도구가 있습니다. 따라서 매크로를 사용하여 문서에서 여러 책갈피를 일괄 제거 할 수 있습니다.

방법 1 : 문서의 모든 책갈피 일괄 삭제

1. 무엇보다 먼저, "Alt + F11" 키를 눌러 Word에서 VBA 편집기를 엽니다.
2. 왼쪽 "프로젝트"패널에서 "일반"을 클릭합니다.
3. 그런 다음 "삽입"탭을 클릭하고 메뉴에서 "모듈"을 선택합니다.
4. 두 번 클릭하여 모듈을 엽니 다.
5. 이제 거기에 다음 코드를 붙여 넣으십시오.

Sub DeleteAllBookmarksInDoc()
  Dim objBookmark As Bookmark
  Dim nBookmark As Integer
  Dim strButtonValue As String
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  nBookmark = objDoc.Bookmarks.Count
  If nBookmark > 0 Then
    strButtonValue = MsgBox("Do you want to remove all " & nBookmark & " bookmark(s) in this document?", vbYesNo)
    If strButtonValue = vbYes Then
      For Each objBookmark In objDoc.Bookmarks
        objBookmark.Delete
      Next objBookmark
      MsgBox ("All bookmarks in this document have been deleted.")
    Else
      Exit Sub
    End If
  End If
 
  Application.ScreenUpdating = True
End Sub

6. 그런 다음 "실행"버튼을 클릭합니다.
7. 다음으로 묻는 상자가 나타납니다. 그리고 현재 문서의 총 북마크 수를 볼 수 있습니다. 모두 삭제하려면 "예"를 클릭하고 매크로를 종료하려면 "아니오"를 클릭합니다.
8. "예"를 선택하면 다음과 같은 메시지를 받게됩니다.

방법 2 : 선택한 모든 책갈피 일괄 삭제

물론 책갈피를 여러 개 제거하고 일부는 그대로 유지해야하는 경우도 있습니다. 마찬가지로 작업을 완료하기 위해 선택 항목에 매크로를 실행합니다.

1. 먼저, 위의 단계를 반복하여 매크로를 설치하고 실행하세요.
2. 매크로를 다음으로 바꾸는 것을 잊지 마십시오.

Sub DeleteAllBookmarksInSelection()
  Dim objBookmark As Bookmark
  Dim nBookmark As Integer
  Dim strButtonValue As String
 
  Application.ScreenUpdating = False
 
  nBookmark = Selection.Bookmarks.Count
  If nBookmark > 0 Then
    strButtonValue = MsgBox("Do you want to remove all " & nBookmark & " bookmark(s) in this selection?", vbYesNo)
    If strButtonValue = vbYes Then
      For Each objBookmark In Selection.Bookmarks
        objBookmark.Delete
      Next objBookmark
      MsgBox ("All " & nBookmark & " bookmark(s) in this selection have been deleted.")
    Else
      Exit Sub
    End If
  End If
 
  Application.ScreenUpdating = True
End Sub

3. 매크로를 실행하기 전에 다양한 내용을 선택해야합니다.
4. 그리고 코드를 실행하는 과정에서 방법 2과 동일한 1 개의 메시지 상자를 받게됩니다.

그 결과 선택 항목의 책갈피 만 제거됩니다.

문서 손상 준비

데이터 손실은 언제든지 누구에게나 발생할 수 있습니다. 그리고 그것의 예측 불가능 성은 우리가 불운에 빠지지 않을 기회를 갖게합니다. 주제에 대해 말하기 docx 수리, 효율적인 수리 도구를 미리 선택하는 것을 절대 놓칠 수 없습니다.

저자 소개 :

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