Khôi phục mật khẩu bảo vệ trang tính trong Excel

Tôi có một bảng tính Excel.

Hai năm trước khi tôi đặt tùy chọn bảo vệ mật khẩu cho một trong các trang tính. Bây giờ tôi đã quên mật khẩu. Có cách nào để khôi phục mật khẩu của bảng Excel đó không?

Bạn không thể khôi phục mật khẩu, nhưng bạn có thể bảo vệ trang tính (Băm được sử dụng để bảo vệ trang tính khá dễ bị va chạm trong các phiên bản cũ của excel, do đó việc tạo ra xung đột khá nhanh ở đây).

Có những kịch bản sẵn sàng, lực lượng vũ phu sẽ mở tờ của bạn trong một khoảng thời gian rất ngắn.

Hãy xem ở đây ví dụ: http://www.theofficeexperts.com/VBASamples/Excel02.htm

Đây là mã:

Sub PasswordBreaker()
  'Author unknown but submitted by brettdj of www.experts-exchange.com

  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)
  If ActiveSheet.ProtectContents = False Then
      MsgBox "One usable password is " & Chr(i) & Chr(j) & _
          Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
          Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
   ActiveWorkbook.Sheets(1).Select
   Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _
          Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
          Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
       Exit Sub
  End If
  Next: Next: Next: Next: Next: Next
  Next: Next: Next: Next: Next: Next


End Sub