Trong bài viết này, chúng tôi xin giới thiệu tới các bạn 2 cách hạn chế việc chỉnh sửa header và footer trong tài liệu Word.
Như chúng ta biết, đầu trang và chân trang của tài liệu phải giữ nguyên tính toàn vẹn để định dạng trở nên chuyên nghiệp. Vì vậy, sẽ rất tốt nếu phát triển các cách để ngăn chặn việc sửa đổi đầu trang hoặc chân trang do cố ý hoặc vô tình. Như thường lệ, đây là 2 phương pháp chúng tôi đề xuất.
Cách 1: Hạn chế chỉnh sửa Header, Footer theo cách thủ công
- Để bắt đầu, hãy nhấn “Ctrl+ Home” để đi đến phần đầu của tài liệu.
- Tiếp theo, nhấp vào tab “Bố cục trang”.
- Sau đó nhấp vào “Nghỉ giải lao” trong nhóm “Thiết lập trang”.
- Và chọn “Liên tục” trên menu thả xuống.
Bây giờ nếu bạn tiết lộ tất cả các dấu ẩn, bạn sẽ thấy một dấu ngắt phần liên tục đã được chèn vào.
- Tiếp theo, nhấp vào tab “Xem lại”, sau đó nhấp vào lệnh “Hạn chế chỉnh sửa” để mở ngăn “Hạn chế định dạng và chỉnh sửa” ở bên phải màn hình.
- Chọn hộp “Chỉ cho phép loại chỉnh sửa này trong tài liệu” và chọn tùy chọn “Điền vào biểu mẫu”.
- Tiếp theo, nhấp vào “Chọn phần” để gọi hộp thoại “Bảo vệ phần”.
- Trong hộp đó, chỉ đánh dấu vào ô “Phần 1” và nhấp vào “OK”.
- Sau đó bấm vào “Có, Start Thực thi bảo vệ”.
- Cuối cùng, nhập và nhập lại mật khẩu rồi nhấn “OK”.
Cho đến nay, khi bạn nhấp vào khu vực đầu trang hoặc chân trang, bạn sẽ không thể vào được.
Cách 2: Hạn chế chỉnh sửa Header, Footer qua VBA
- Nhấn “Alt + F11” để mở trình soạn thảo VBA trước.
- Sau đó nhấp vào dự án “Bình thường” và sau đó nhấp vào tab “Chèn”.
- Chọn “Mô-đun” trên menu để chèn một mô-đun mới vào dự án “Bình thường”.
- Nhấp đúp vào mô-đun để hiển thị vùng mã hóa và dán macro sau vào đó:
Sub ProtectHeaderAndFooter() Selection.HomeKey Unit:=wdStory Selection.InsertBreak Type:=wdSectionBreakContinuous ActiveDocument.Sections(1).ProtectedForForms = True ActiveDocument.Protect wdAllowOnlyFormFields End Sub
Nhân tiện, trong trường hợp bạn cần xử lý hàng loạt nhiều tài liệu, thay vào đó hãy dán macro này:
Sub ProtectHeaderAndFooterInMultiDoc()
Dim objDoc As Document
Dim strFile As String, strFolder As String
' Initialization
strFolder = "C:\Users\Public\Documents\New folder\Test2\"
strFile = Dir(strFolder & "*.docx", vbNormal)
' Precess each document in the folder.
While strFile <> ""
Set objDoc = Documents.Open(FileName:=strFolder & strFile)
Selection.HomeKey Unit:=wdStory
Selection.InsertBreak Type:=wdSectionBreakContinuous
ActiveDocument.Sections(1).ProtectedForForms = True
ActiveDocument.Protect wdAllowOnlyFormFields
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
End Sub
Nhưng hãy nhớ sắp xếp tất cả các tài liệu trong cùng một thư mục trước bất cứ điều gì khác. Và thay thế “C:\Users\Public\Documents\New folder\Test2\” bằng đường dẫn thư mục thực của bạn.
- Cuối cùng, nhấp vào "Chạy".
Với việc sử dụng macro, không cần nhập mật khẩu để bảo vệ đầu trang và chân trang.
Xử lý các vấn đề về tài liệu
Tài liệu Word, giống như tất cả các loại tệp khác, dễ dàng là nạn nhân của lỗi phần mềm. Do đó, để bảo mật các tài liệu có giá trị của bạn và ngăn chúng mãi mãi không thể truy cập được, bạn có thể sử dụng tảo bẹ sửa lỗi docx công 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 Excel bị hỏng 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