gacerindo - Cara Membuka File Microsoft Excel Yang Di Protect Password Tanpa Sofware itu mudah dilakukan. Kamu tidak perlu mendownload aplikasi untuk membuka password file excel dengan cara yang sangat gampang.
Untuk apa sheet Miscrosoft Excel itu di protect menggunakan password? Salah satu jawabannya yaitu untuk mengamankan file tersebut. File excel yang sudah di password oleh User biasanya tidak akan bisa dibuka, apalagi di edit sedemikian rupa.
Biasanya file excel tersebut berisi dokumen-dokumen penting yang bersifat pribadi atau rahasia, sehingga tidak bocor ke pihak yang tidak bertanggung jawab.
Bagi kamu yang sering atau pernah membuat password pada file excel mungkin tidak terlalu sulit untuk membukanya. Akan tetapi bagaimana kalau file tersebut dibuka kembali setelah beberapa tahun. Apakah kamu akan ingat dengan passwordnya?
Pada kesempatan kali ini, saya akan memberikan bagaimana cara membuka password microsoft Excel tanpa bantuan sofware apapun. Silahkan simak panduannya dibawah ini.
Cara Membuka Sheet Microsoft Excel Yang Diproteksi Password Tanpa Software
1. Silahkan buka file excel yang akan kamu unprotect.
2. Kemudian tekan tombol ALT + F11, nanti akan muncul kotak Microsoft Visual Basic Application.
3. Pilih Insert Module.
4. Masukan kode berikut ini.
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
5. Kalau gagal coba pakai kode dibawah ini.
Sub InternalPasswords()
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
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
6. Pilih sheet atau workbook yang ingin kamu unprotect.
7. Kemudian Save.
8. Setelah itu di close, nantinya akan kembali ke sheet Excel yang akan di unprotect.
9. Kemudian Macro > Show Macro > Internal Password > Run
10. Kemudian tunggu beberapa saat, tergantung besar atau kecilnya ukuran file excel tersebut.
11. File sudah bisa di edit kembali.
Selamat file Excel yang di proteksi menggunakan password, kini bisa kamu buka kembali, bahkan bisa kamu edit. Semoga bermanfaat, apabila ada kesalahan, mohon dimaafkan, itu karena keterbatasan ilmu saya. Selamat mencoba.
