Mô tả 1 file Excel *.xls được bảo vệ như sau:

Mục tiêu

  • Phá chế độ bảo vệ form (để chỉnh sửa được form) 
  • Sau đó phá tiếp mật khẩu bảo vệ file (để làm hiện lên các sheet ẩn). 

Thực hiện

1. Phá chế độ bảo vệ form

Toàn bộ file đã được đặt pass chống chỉnh sửa, chỉ cho xem Sheet 1 còn các Sheet khác đã bị ẩn bởi mã VB. Sheet đầu tiên là form được bảo vệ bằng mật khẩu để chống chỉnh sửa form mà chỉ được điền vào chỗ cho phép.

Click phải vào tên Sheet 1 và chọn View code (hoặc Alt + F11 để hiện VB rồi click đúp vào tên Sheet có form được bảo vệ). Nếu trong VB editor không hiện các cửa sổ Sheet thì nhấn Ctrl + R để hiện chúng lên.

Điền đoạn code sau vào rồi cho chạy (F5) > Yes (khi hỏi muốn thực hiện không) > OK (hộp thoại báo đã unprotect thành công hiển thị).

Sub PasswordBreaker() If ActiveSheet.ProtectContents = False Then MsgBox "Sheet '" & ActiveSheet.Name & "' is unprotected!", vbInformation Else If MsgBox("Sheet '" & ActiveSheet.Name & "' is protected, do you want to unprotect it?", _ vbYesNo + vbQuestion, "Unprotect Active Sheet") = vbNo Then Exit Sub Dim i As Integer, j As Integer, k As Integer Dim l As Integer, m As Integer, n As Integer Dim i1 As Integer, i2 As Integer, i3 As Integer Dim i4 As Integer, i5 As Integer, i6 As Integer On Error Resume Next For i = 65 To 66: For j = 65 To 66: For k = 65 To 66 For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66 For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66 For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 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) Next: Next: Next: Next: Next: Next Next: Next: Next: Next: Next: Next If ActiveSheet.ProtectContents = False Then MsgBox "Sheet '" & ActiveSheet.Name & "' is unprotected!", vbInformation End If End Sub

2. Phần mềm phá pass bảo vệ file

Cái này thì sử dụng phần mềm Office Password Recovery Toolbox cho đơn giản. Download Office Password Recovery Toolbox 4.0.1 tại đây (hiện tại có thể phần mềm đã nâng cấp phiên bản mới hơn, hãy tìm trên Google nhé):

http://www.mediafire.com/download/nnpbyv64uc3clzt/Office_Password_Recovery_Toolbox_4.0.1.rar

Sau khi crack xong ta add file cần phá pass vào, phần mềm sẽ hiển thị cho biết pass của file là gì.