3 cách để nhanh chóng xóa tất cả các phần ngắt trong tài liệu Word của bạn

Chia sẻ ngay bây giờ:

Trong bài viết này, chúng tôi muốn chia sẻ với các bạn 3 cách để xóa nhanh tất cả dấu ngắt phần trong tài liệu Word.

Ngắt phần rất hữu ích trong việc tạo nhiều phần trong tài liệu Word. Vì vậy, bạn có thể định dạng các phần khác nhau theo các phong cách đặc biệt. Và đây là bài viết trước của chúng tôi để bạn có thể nhanh chóng chèn dấu ngắt phần trong tài liệu: 3 cách để nhanh chóng chèn các phần ngắt vào tài liệu Word của bạn

Tuy nhiên, việc sửa đổi một tài liệu là khá phổ biến, chẳng hạn như thay đổi kiểu, chia lại các phần, v.v. Đặc biệt, nếu có một sự điều chỉnh lớn cần thực hiện, bạn có thể sẽ cần phải loại bỏ tất cả các ngắt phần. Sau đây là 3 phương pháp bạn có thể sử dụng để xóa hàng loạt phần ngắt.Xóa tất cả các phần ngắt trong tài liệu Word của bạn

Phương pháp 1: Tìm tất cả các ngắt phần trong tài liệu

  1. Trước hết, nhấn “Ctrl + H” để mở hộp “Tìm và thay thế” trong Word.
  2. Tiếp theo, đặt con trỏ bên trong hộp văn bản “Tìm gì”.
  3. Nhấp vào nút "Thêm" để có thêm tùy chọn.
  4. Sau đó nhấp vào “Đặc biệt” và chọn “Ngắt phần” trên menu của nó. Sau đó, bạn sẽ thấy “^ b” trong hộp văn bản “Tìm gì”. Vì vậy, một cách khác là nhập “^ b” ngay sau bước 2.Bấm vào "Đặc biệt"->Chọn "Ngắt phần"
  5. Cuối cùng, để trống hộp “Thay thế bằng” và nhấp vào “Thay thế tất cả”. Nhấp vào “OK” trên hộp xác nhận.Nhập "^b" vào Hộp văn bản "Tìm gì"->Nhấp vào "Thay thế tất cả"

Phương pháp 2: Chạy Macro để xóa tất cả các ngắt phần trong một tài liệu

Đây là cách tự động để bạn loại bỏ tất cả các ngắt phần không mong muốn.

  1. Để bắt đầu, hãy mở trình soạn thảo VBA trong Word bằng cách nhấn “Alt + F11”.
  2. Sau đó, tạo một mô-đun mới bằng cách nhấp vào “Bình thường”.
  3. Tiếp theo nhấp vào “Chèn” và chọn “Mô-đun”.Nhấp vào "Bình thường" -> Nhấp vào "Chèn" -> Nhấp vào "Mô-đun"
  4. Bây giờ mở mô-đun bằng cách nhấp đúp.
  5. Trong không gian mã hóa ở phía bên phải, hãy dán các mã sau:
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
  1. Cuối cùng, nhấp vào “Chạy”.Dán mã-> Nhấp vào "Chạy"

Bạn sẽ không tìm thấy tất cả các phần ngắt trong một giây.

Phương pháp 3: Xóa tất cả các dấu ngắt phần trong nhiều tài liệu

Tương tự, chúng ta phải chạy một macro nếu chúng ta muốn thực hiện nó một cách nhanh chóng và dễ dàng.

  1. Trước hết, hãy đặt tất cả các tài liệu đích vào một thư mục.
  2. Sau đó, cài đặt macro với các bước trong phương pháp 2.
  3. Chạy macro này thay thế:
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
  1. Tiếp theo trong cửa sổ “Duyệt qua” mở ra, hãy chọn thư mục mà bạn lưu tài liệu.
  2. Cuối cùng nhưng không kém phần quan trọng, hãy nhấp vào “OK”.Chọn một thư mục-> Nhấp vào "OK"

Chuẩn bị cho việc mất dữ liệu

Thông thường, với thói quen sử dụng tốt, may mắn và mọi điều tốt lành, bạn có thể đạt được nhiều thành tựu trong Word. Nhưng sự cố có thể xảy ra bất cứ lúc nào. Vì vậy, việc sao lưu tài liệu thường xuyên là vô cùng quan trọng. Với bản sao lưu trong tay, bạn sẽ tự tin hơn trước khi bắt đầu công việc. sửa lỗi docx.

Giới thiệu tác giả:

Vera Chen là một chuyên gia phục hồi dữ liệu trong DataNumen, Inc., công ty hàng đầu thế giới về công nghệ khôi phục dữ liệu, bao gồm phục hồi xls và pdf sửa chữa các sản phẩm phần mềm. Để biết thêm thông tin, hãy truy cập www.datanumennăm

Chia sẻ ngay bây giờ:

Được đóng lại.