Mã VBA để mở khóa trang tính Excel đã khóa: 4 bước

2024 Tác giả: John Day | [email protected]. Sửa đổi lần cuối: 2024-01-30 13:34

Nếu bạn đã từng quên mật khẩu cho một trong các trang tính excel của mình, bạn biết điều đó có thể gây khó chịu như thế nào. Mã được sử dụng trong hướng dẫn này là một trong những mã đơn giản nhất mà tôi đã tìm thấy. Nó sẽ tạo ra một mã có thể sử dụng để mở khóa trang tính được bảo vệ của bạn. Tôi không thể nhận được tín dụng cho mã vì tôi chỉ tìm thấy nó trong một thời điểm cần thiết (và tôi không thể tìm thấy trang web ở đâu nữa)… vì vậy, tôi sẽ không giúp được gì nhiều nếu nó không hoạt động với bạn nhưng tôi đã thành công với nó và nghĩ rằng tôi sẽ chia sẻ.

Bước 1: Mở VBA

Mở trang tính mà bạn quên mật khẩu, sử dụng tổ hợp phím Alt + F11 để vào trình chỉnh sửa macro Sau khi trong VBA, hãy nhấp đúp vào trang tính bạn cần mở khóa từ danh sách menu bên trái, thao tác này sẽ mở trang khai báo chung cho trang tính.

Bước 2: Cắt và dán Code Breaker

Chèn đoạn mã bên dưới vào trang khai báo chung mà bạn đã mở. Bạn không cần phải thay đổi bất cứ thứ gì, tên trang tính, v.v. Chỉ cần cắt và dán._ Sub PasswordBreaker () 'Phá vỡ mật khẩu bảo vệ trang tính. k As Integer j = 65 Đến 66: Cho k = 65 Đến 66 Cho l = 65 Đến 66: Với m = 65 Đến 66: Với i1 = 65 Đến 66: Với i2 = 65 Đến 66: Với i3 = 65 Đến 66: Với i4 = 65 Tới 66 Đối với i5 = 65 Đến 66: Đối với i6 = 65 Đến 66: Đối với n = 32 Đến 126 ActiveSheet. Unprotect Chr (i) & Chr (j) & Chr (k) & _ Chr (l) & Chr (m) & Chr (i1) & Chr (i2) & Chr (i3) & _Chr (i4) & Chr (i5) & Chr (i6) & Chr (n) If ActiveSheet. ProtectContents = False Thì MsgBox "Một mật khẩu có thể sử dụng là" & Chr (i) & Chr (j) & _ Chr (k) & Chr (l) & Chr (m) & Chr (i1) & Chr (i2) & _ Chr (i3) & Chr (i4) & Chr (i5) & Chr (i6) & Chr (n) Thoát khỏi Sub End Nếu Tiếp theo: Tiếp theo: Tiếp theo: Tiếp theo: Tiếp theo: Tiếp theo Tiếp theo: Tiếp theo: Tiếp theo: Tiếp theo: Tiếp theo: Tiếp theo Kết thúc Sub_

Bước 3: Chạy Macro

Sau khi mã được thêm vào, hãy chạy Macro bằng cách chọn Chạy từ thanh tab trình đơn ở đầu màn hình trình chỉnh sửa VBA hoặc nhấn F5 đơn giản

Bước 4: Sử dụng mã đã tạo

Macro sẽ đưa bạn trở lại trang tính mà bạn muốn bỏ bảo vệ. Hộp kiểu cảnh báo sẽ xuất hiện với mã có thể sử dụng. Trong tab menu Xem lại, nhấp vào Bỏ bảo vệ trang tính, nhập mã đã tạo làm mật khẩu và bạn đã hoàn tất. Trang tính của bạn sẽ được mở khóa! Bạn chỉ nên sử dụng sức mạnh này một cách khôn ngoan và có trách nhiệm để mở khóa trang tính của chính mình.