Đặt mật khẩu file Excel cùng lúc trên nhiều Sheet

Để bảo vệ file excel tránh bị người khác chỉnh sửa dữ liệu bên trong, bạn cần đặt mật khẩu, đối với file có nhiều sheet, bạn sẽ phải mất thời gian để làm thủ công cho từng sheet. Bài viết này chia sẻ các bạn cách cùng lúc có thể đặt mật khẩu cho tất cả các sheet trong file excel nhanh chóng

Có 2 cách để đặt mật khẩu bảo vệ sheet excel

Cách thông thường

Thông thường, nếu muốn đặt mật khẩu bảo vệ sheet Excel thì các bạn cần mở sheet đó lên rồi chọn thẻ Review trên thanh công cụ. Sau đó các bạn chọn mục Protect Sheet tại mục Protect.
Hoặc bạn cũng có thể nhấn chuột phải vào sheet cần bảo vệ bằng mật khẩu và chọn vào mục Protect Sheet.

Ngay sau đó, hộp thoại Protect Sheet hiện thị, bạn nhập mật khẩu vào ô bên dưới dòng Password to unprotect sheet và bấm Ok để hoàn tất đặt mật khẩu cho sheet excel hiện tại. Với những sheet còn lại trong file excel, bạn cũng thao tác tương tự để lần lượt đặt mật khẩu.

Có thể nói cách thông thường này chỉ phù hợp với những file chỉ chứa 1 hoặc 2 sheet, nếu file bạn rất nhiều sheet thì cách này sẽ rất mất thời gian. Do đó bạn cần dùng cách thứ 2 sau đây để thực hiện đặt mật khẩu cho nhiều sheet excel cùng lúc

Cách nâng cao: dùng VBA để đặt mật khẩu cho file excel có nhiều sheet

Đầu tiên, tại thanh công cụ bạn nhấn chọn vào thẻ Developer, tiếp theo bấm vào mục Visual Basic hoặc nhấn đồng thời 2 phím Alt+F11 để mở cửa sổ VBA

Sau đó, bạn sẽ thấy cửa sổ giao diện Microsoft Visual Basic for Applications xuất hiện. Bạn tiếp tục chọn vào tab Insert, tại thanh danh mục hiện ra, bạn bấm vào mục Module

Và cửa sổ Module2 (Code) hiển thị, bạn copy đoạn code bên dưới và dán vào hộp thoại này

Sub Protect_Unprotect_Ws()
Dim Ws As Worksheet
For Each Ws In Worksheets
Ws.Protect Password:=”sucmanhso.net
Next Ws
Set Ws = Nothing
End Sub

Lưu ý: dòng bôi màu trong dấu ngoặc kép chính là mật khẩu bạn dùng để đặt và bảo vệ tất cả các sheet trong file excel
Tiếp tục, bạn nhấn chọn vào Run, rồi chọn vào Run sub/UserForm hoặc nhấn phím F5 để chạy đoạn code vừa nhập.

Như vậy là bạn đã thiết lập mật khẩu để bạn bảo vệ sheet excel để tránh người khác có thể sửa nội dung dữ liệu bên trong file

Cách mở khoá, bỏ đặt mật khẩu cho tất cả các sheet trong file excel

Ngoài cách thông thường là nhấn chuột phải vào sheet hoặc vào Review rồi chọn Unprotect Sheet, hộp thoại yêu cầu bạn nhập mật khẩu để mở khoá và nhấn OK

Để nhanh chóng tắt chế độ bảo vệ sheet trong file excel bằng mật khẩu, Bạn có thể dùng mã code sau để dán vào hộp thoại Module như các bước đặt mật khẩu ở trên

Sub Protect_Unprotect_Ws()
Dim Ws As Worksheet
For Each Ws In Worksheets
Ws.Unprotect Password:=”sucmanhso.net
Next Ws
Set Ws = Nothing
End Sub

Lưu ý đoạn bôi màu trong dấu ngoặc kép “” là mật khẩu để mở khoá giống như lúc đặt bảo vệ
Sau đó bạn cũng bấm Run, rồi chọn vào Run sub/UserForm hoặc nhấn phím F5 để hoàn thành mở khoá

Chúc bạn thành công

Trả lời