Cara Membuka Password Excel Sheet Tanpa Software
Dari judul diatas kita akan membahas bagaimana cara membuka password file di Microsoft excel lebih khususnya tentang cara membuka Sheet Excel yang di proteksi dan tidak di perbolehkan untuk di edit untuk keperluan kita. Ok sobat 4cnb...langsung saja kita jalankan langkah-langkahnya.......
- Pastikan kita sudah mempunyai file MS Excel yang akan kita buka proteksinya
 |
| Protect Sheet |
- Kita buka file excel tersebut seperti biasa
 |
| Sheet Excel |
- Setelah itu kita bisa buka tab Developer, dan bila di tab ti dak muncul maka bisa menekan kombinasi Alt + F11 maka akan langsung menuju Macros
- Tab Macros untuk memasukan Code
- Paste kan code di bawah ini di Tab macro ( Pastikan di sheet yang akan kita buka proteksinya)
- Kemudian Klik Run Macro di tombol Play.
++++++++++++++++++++++++++++++++
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
++++++++++++++++++++++++++++++++
Untuk membuka password excel di macros akan saya ulas di artikel salnjutnya,
Semoga Bermanfaat