Sebenarnya itu tidaklah sulit untuk membuka dan mengetahui pasword yang ada pada program excel tersebut. Kita cukup memasukan modul dan menjalankan pada sheet excel yang telah di pasword.
Berikut adalah langkah langkah cara menghapus pasword pada EXCEL :
- Buka file excel yang di protect klik kanan dan pilih view code atau klik Alt+F11 pada keyboard.
- klik 2x pada sheet yang telah di protect dan masukan kode scrip di bawah ini.
Sub InternalPasswords()
Dim i As Integer, j As Integer, k As IntegerDim 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
ActiveWorkbook.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)
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 ActiveWorkbook.ProtectStructure = False Then
If ActiveWorkbook.ProtectWindows = False Then
If ActiveSheet.ProtectContents = False Then
Exit Sub
End If
End If
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
Kemudian jalan kan dengan memilih run pada tab pilihan di atas. tunggu sampai prosesnya selesai maka shet tersebut sudah bisa di edit sesuai yang kalian inginkan.
Demikian cara membuka pasword excel semoga dapat membantu kalian dalam mengerjakan laporan dan tugas.
Terima Kasih
Comments