kết quả từ 1 tới 10 trên 10
  1. #1
    quanltv's Avatar
    quanltv đang off Sư phụ của ADMIN
    Thành Viên Thứ: 146858
    Ðến Từ: Hà Nội
    Bài gởi
    2.648
    Giới tính: Nam
    Yahoo: minhduc
    Thanks
    88
    Thanked 1.622 Times in 848 Posts

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

    Cách phá Password Excel không cần phần mềm, phá pass sheet excel, phần mềm phá pass excel hiệu quả, phá mật khẩu excel

    Cách làm trong Excel 2007/2010 như sau: bấm Alt + F11 để hiện ra bảng Visual Basic Editor rồi sau đó thực hiện theo bước 3 như phía dưới.

    Cách làm trong Excel 2003 như sau:

    1. Mở file Excel có chứa các Sheet có pass
    2 Chọn menu Tools -> Macro -> Visual Basic Editor
    3 Nhấp đúp vào Sheet mà bạn muốn phá pass
    Nếu bạn chưa thấy các Sheet bên phía trái của màn hình thì bấm: Ctrl + R để hiện các Sheet.
    ( Nhiều máy khi bấm Alt + F11 thì không thấy cửa sổ bên trái hiện các Sheet )
    4. Copy đoạn mã sau vào và nhấn menu Run -> Run Sub/UserForm (hoặc nhấn F5)




    5. Máy hỏi bạn có muốn xử lý nó không ? Nếu muốn bấm YES



    6. Bạn chờ một lúc máy sẽ phá Pass cho bạn. Và có thông báo sau khi phá Pass thành công.




    Mã:
    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
    Mình đã thử và thành công.

    Like Fanpage Vforum.vn
    Thay đổi nội dung bởi: quanltv, 05-10-2013 lúc 10:24 PM
    Hãy nhấn nút Thank nếu thấy bài viết hữu ích
    Quick reply to this message Trả lời       

  2. 3 thành viên đã cảm ơn quanltv:


  3. #2
    tuancntt84's Avatar
    tuancntt84 đang off
    Thành Viên Thứ: 222215
    Ðến Từ: Thừa Thiên - Huế
    Bài gởi
    1
    Thanks
    0
    Thanked 0 Times in 0 Posts

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

    password giúp ta bảo mật tốt dữ liệu, nhưng đôi lúc do công việc nhiều quá nên quên. ACE nào phá không được alo cho mình :Tuấn 0972709052, email: lenguyen9984@yahoo.com.vn. Chỉ cần 5 phút là có tin vui, đảm bảo toàn vẹn dữ liệu.

  4. #3
    Bài gởi
    467
    Giới tính: Nam
    Yahoo: quanghandoan
    Thanks
    68
    Thanked 162 Times in 82 Posts

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

    Excel 2013 có làm được không anh?
    Việt Nam cưỡi rồng bay trong gió
    Trung Quốc cưỡi chó sủa Gâu Gâu
    Thái Lan hỏi "Quốc" đi đâu
    Thằng "Quốc" nó bảo đi hầu Việt Nam


  5. #4
    chinh.ld's Avatar
    chinh.ld đang off
    Thành Viên Thứ: 222438
    Ðến Từ: Hà Nội
    Bài gởi
    2
    Giới tính: Nam
    Thanks
    0
    Thanked 0 Times in 0 Posts

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

    vãi bạn có email không mình gửi cho bạn file excel của mình thêm câu trức hire và protect window xem ban có phá được không
    không cho bạn có quyên xâm nhập vào các ô để xem bạn làm thế nào???
    bạn chỉ có mở excel với quyền người xem chứ không có quyền xâm nhập hay viết bất kỳ ký tự nào!

  6. #5
    dargonson's Avatar
    dargonson đang off
    Thành Viên Thứ: 171316
    Ðến Từ: Tỉnh Khác
    Bài gởi
    1
    Giới tính: Nam
    Yahoo: 1
    Thanks
    0
    Thanked 0 Times in 0 Posts

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

    Trích Nguyên văn bởi chinh.ld Xem bài viết
    vãi bạn có email không mình gửi cho bạn file excel của mình thêm câu trức hire và protect window xem ban có phá được không
    không cho bạn có quyên xâm nhập vào các ô để xem bạn làm thế nào???
    bạn chỉ có mở excel với quyền người xem chứ không có quyền xâm nhập hay viết bất kỳ ký tự nào!

    langtugiangho0210@gmail.com

    Mời bạn cứ gửi

  7. #6
    heoconmaungoc's Avatar
    heoconmaungoc đang off
    Thành Viên Thứ: 228783
    Ðến Từ: TP. Hồ Chí Minh
    Bài gởi
    75
    Thanks
    2
    Thanked 7 Times in 6 Posts

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

    Thật là cao thủ quá mà. Bạn làm gì để tìm được đoạn mã lợi hại như vậy?

  8. #7
    thanhnx1990's Avatar
    thanhnx1990 đang off
    Thành Viên Thứ: 221419
    Ðến Từ: Hà Nội
    Bài gởi
    12
    Yahoo: thanhnx90
    Thanks
    0
    Thanked 0 Times in 0 Posts

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

    Cái này có ảnh hưởng tới định dạng văn bản không bạn ?

  9. #8
    soihu's Avatar
    soihu đang off
    Thành Viên Thứ: 76069
    Ðến Từ: Huyện Giá Rai
    Bài gởi
    1
    Giới tính: Nam
    Thanks
    0
    Thanked 0 Times in 0 Posts

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

    Trích Nguyên văn bởi thanhnx1990 Xem bài viết
    Cái này có ảnh hưởng tới định dạng văn bản không bạn ?
    cái này không ảnh hưởng đến định dạng văn bản đâu bạn, chỉ cần làm như hướng dẫn chạy đoạn code trên kia là xóa mọi protected sheet thôi

  10. #9
    mai127's Avatar
    mai127 đang off
    Thành Viên Thứ: 264761
    Ðến Từ: Hà Nội
    Bài gởi
    1
    Thanks
    1
    Thanked 0 Times in 0 Posts

    Thumbs up Reply: Cách phá Password Excel không cần phần mềm

    Trích Nguyên văn bởi quanltv Xem bài viết
    Cách phá Password Excel không cần phần mềm, phá pass sheet excel, phần mềm phá pass excel hiệu quả, phá mật khẩu excel

    Cách làm trong Excel 2007/2010 như sau: bấm Alt + F11 để hiện ra bảng Visual Basic Editor rồi sau đó thực hiện theo bước 3 như phía dưới.

    Cách làm trong Excel 2003 như sau:

    1. Mở file Excel có chứa các Sheet có pass
    2 Chọn menu Tools -> Macro -> Visual Basic Editor
    3 Nhấp đúp vào Sheet mà bạn muốn phá pass
    Nếu bạn chưa thấy các Sheet bên phía trái của màn hình thì bấm: Ctrl + R để hiện các Sheet.
    ( Nhiều máy khi bấm Alt + F11 thì không thấy cửa sổ bên trái hiện các Sheet )
    4. Copy đoạn mã sau vào và nhấn menu Run -> Run Sub/UserForm (hoặc nhấn F5)





    5. Máy hỏi bạn có muốn xử lý nó không ? Nếu muốn bấm YES




    6. Bạn chờ một lúc máy sẽ phá Pass cho bạn. Và có thông báo sau khi phá Pass thành công.





    Mã:
    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
    Mình đã thử và thành công.
    Bạn giỏi quá, mình làm theo được rồi,hihi

  11. #10
    duckvhb's Avatar
    duckvhb đang off
    Thành Viên Thứ: 264774
    Ðến Từ: Đắk Nông
    Bài gởi
    9
    Giới tính: Nam
    Yahoo: VHBBBBB
    Thanks
    1
    Thanked 0 Times in 0 Posts

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

    thank thớt nhiều lắm