Cách phá Password Excel không cần phần mềm

Bạn mở 1 file excel nhưng bị cài đặt mất khẩu không chỉnh sửa được. Hôm nay tôi chỉ bạn Cách phá Password Excel không cần phần mềm.

Cách phá mật khẩu excel

Đối với các phiên bản excel mới từ 2007-2016 thì các bạn chỉ cần bấm phím tắt ALT+F11 là mở ra hộp thoại Visual Basic Editor.

Đối với Excel 2003 thì chúng ta làm như sau:

1. Mở file Excel có chứa các Sheet có pass

2 Chọn menu Tools -> Macro -> Visual Basic Editor

Bạn click vào sheet cần phá pass, ví dụ của tôi là sheett đầu vào cần phá. Chọn chuột phải chọn View Code hoặc kích đúp chuột vào sheet đó là được

Nếu chưa hiện các sheet ra bạn nhấn phím tắt: CTRL+R

Cách phá mật khẩu excel

 Sau đó Copy đoạn mã sau cho vào box code trên:

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

Sau khi Copy đoạn mã bạn dán chúng vào Visual Basic Editor. Từ  menu Run =>Run Sub/UserForm (hoặc nhấn F5) để chạy lệnh.

Sau đó sẽ xuất hiện 1 box mới hỏi bạn có đồng ý phá bảo mật của Sheet đó không, bạn chọn Yes và đợi thành quả nhé.

Lựa chọn phá mật khẩu.