Trong bài viết này, chúng ta sẽ tập trung giới thiệu 4 phương pháp nhanh chóng để loại bỏ các ngắt trang không mong muốn trong tài liệu Word của bạn.
Word tự động chèn ngắt trang khi chuyển từ trang này sang trang khác. Ngoài ra, bạn có thể chèn ngắt trang thủ công sau khi kết thúc một đoạn văn bản. Khi đó, văn bản sẽ bắt đầu ở đầu trang tiếp theo. Để biết cách chèn ngắt trang thủ công, bạn có thể tham khảo bài viết này: 5 cách để nhanh chóng chèn ngắt trang vào tài liệu Word của bạn
Tuy nhiên, bạn nên hiểu rằng việc ngắt trang tự động là vô hình và do đó không thể xóa theo cách thủ công. Nhưng việc ngắt trang thủ công được chèn vào thì có. Vì vậy, bài viết của chúng tôi chủ yếu sẽ cung cấp cho bạn những phương pháp hữu ích để loại bỏ các ngắt trang thủ công không mong muốn trong tài liệu Word. 
Phương pháp 1: Xóa ngắt trang theo cách thủ công
- Trước hết, bạn phải nhấp vào lệnh “Hiển thị/Ẩn” trong tab “Trang chủ” để hiển thị tất cả các dấu và ký hiệu ẩn trong tài liệu để bạn có thể xem ngắt trang.
- Tiếp theo, chọn ngắt trang và nhấn “Xóa” để loại bỏ nó.
- Hoặc bạn có thể nhấp vào bên trái ngắt trang rồi nhấn “Xóa”.
Cách 2: Sử dụng tính năng “Tìm và Thay thế”
- Để bắt đầu, hãy nhấn “Ctrl + H” để kích hoạt hộp “Tìm và Thay thế”.
- Sau đó đặt con trỏ vào hộp văn bản “Tìm gì” và nhấp vào tab “Thêm”.
- Tiếp theo nhấp vào “Đặc biệt” và chọn “Ngắt trang thủ công” trên menu đó.
- Cuối cùng, để trống hộp “Thay thế bằng” và nhấp vào “Thay thế tất cả” để xóa từng ngắt trang trong tài liệu.
Phương pháp 3: Chạy Macro để xóa tất cả ngắt trang trong tài liệu
- Trước hết, hãy kích hoạt trình soạn thảo VBA trong Word bằng cách nhấn “Alt + F11”.
- Tiếp theo, nhấp vào dự án "Bình thường" ở cột bên trái.
- Sau đó nhấp vào “Chèn” trên thanh menu và chọn “Mô-đun”.
- Mở mô-đun bằng cách nhấp đúp và dán các mã sau vào đó:
Sub DeleteAllPageBreaksInOneDoc()
Application.ScreenUpdating = False
With Selection
.HomeKey Unit:=wdStory
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "^m"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
.Execute Replace:=wdReplaceAll
End With
End With
MsgBox ("All manual page breaks in the document have been removed!")
Application.ScreenUpdating = True
End Sub
- Cuối cùng nhấn “F5” để thực thi mã.
Phương pháp 4: Xóa tất cả ngắt trang trong tất cả tài liệu trong một thư mục
Để xóa tất cả ngắt trang trong tất cả tài liệu trong một thư mục, bạn có thể sử dụng phương pháp này.
- Để cài đặt và chạy macro, bạn có thể tham khảo các bước trong phương pháp 3.
- Và nhớ thay thế bằng macro này bên dưới nhé:
Sub DeleteAllPageBreaksInAFolder()
Dim StrFolder As String
Dim strFile As String
Dim objDoc As Document
Dim dlgFile As FileDialog
Application.ScreenUpdating = False
Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
With dlgFile
If .Show = -1 Then
StrFolder = .SelectedItems(1) & "\"
Else
MsgBox "Select a folder first!"
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 = "^m"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
.Execute Replace:=wdReplaceAll
End With
End With
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
Application.ScreenUpdating = True
End Sub
Macro này sẽ kích hoạt cửa sổ “Browse”. Chọn thư mục chứa các tài liệu cần tìm và nhấp vào “OK” để tiếp tục.
Chuẩn bị cho thảm họa dữ liệu
Nhiều bạn đã nhận thức được tính ngẫu nhiên của việc mất dữ liệu. Đối với người dùng Word, bạn cũng nên chuẩn bị tốt cho mọi thảm họa dữ liệu. Và một trong những cách tốt nhất là có được một sửa chữa docx công cụ trước.
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 xlsx 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



