Membuka Password Excel Sheet

Pernah membuka file excel dan didalamnya ada sheet yang diproteksi ? Mungkin anda pernah memprotect sheet suatu file excel dan lupa passwordnya sehingga file tersebut tidak bisa kita edit, Nah ! kali ini kita akan coba menunjukkan bagaimana caranya membuka protect sheet suatu file excel atau cara membuka password excel sheet,

Membuka proteksi sheet Excel kita mempergunakan script Visual Basic Editor (VBA), cara script VBA adalah yang saya pergunakan dengan alasan kompabilitas dengan program microsoft excel yang memang menyediakan perintah bahasa pemrograman modul VBS secara defaultnya.

File excel yang sheet-nya di protect biasanya tidak bisa di edit sama sekali, semua click seolah tidak berfungsi, pada tab “review” coba anda cek, apabila ada icon file excel bertuliskan unprotect sheet, itu tandanya sheet tersebut di proteksi oleh pembuatnya.

 Berikut ini tahapan cara membuka password excel sheet :

1.     Buka file excel yang sheetnya di proteksi.

2.     Buka Microsoft Visual Basic Editor dengan cara menekan tombol kombinasi “Alt + F11″ di lanjutkan klik insert - module

3.     Selanjutnya cara cara membuka password excel sheet Pada jendela module, copy pastekan kode berikut :

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

4.     Klik tab Tool – Macros - Internal Password - run

5.     Tunggu beberapa saat dan silahkan tutup  Microsoft Visual Basic Editor

6.     Lihat file excel yang di proteksi tersebut sudah bisa di edit lihat juga pada tab “review” kini icon sheet sudah bertuliskan protect sheet sebagai tanda sudah tidak di protect lagi