Membuka Sheet yang Terkunci pada Excel

Pada saat kita membuat file excel kita ingin melindungi bagian tertentu agar tidak bisa diedit, untuk hal itu kita bisa dengan mengunci sheet file tersebut.Namun sering kali pada saat akan mengedit kita lupa password, maka saya mencoba memberikan tips Membuka Sheet yang terkunci. Hal ini berguna pula untuk file yang punya orang lain untuk dibuka.kita sering mendownload punya orang yang sengaja dikunci.

Untuk membuka sheet yang terkunci caranya sangatlah mudah yaitu klik menu tab developer atau dengan Alt + F11 pada keyboard untuk masuk ke jendela Visual basic, kemudian buatlah sebuat modul dengan cara memilih menu insert kemudian module Lalu ketikan kode berikut

Sub BukaSheet ()
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 "Password Crack Yang Sudah termodifikasi Adalah:" & 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

kemudian jalankan Macro Buat sheet dengan cara memilih menu tool macro kemudian pilih bukaSheet kemudian klik tombol Run.

untuk lebih jelasnya bisa dilihat dari video tutorial silahkan download di sini

demikian tips membuka sheet yang terkunci pada excel.