About

Lorem.Read more about me »

Wy Gallery

Lorem ipsum dolor sit amet, consectetuer adipiscing elit Featured Work

Rss

RSS Feed

Cara membuka Sheet Excel Yang diproteksi

Kamis, 13 Juni 2013

Caranya sangat mudah sobat langsung saja masuk ke VBA atau tekan  (Alt+F11), pada jendela VBA  klik Insert dan klik Module.


Kemudian copy-kan syntax VBA berikut ini ke dalam Module tersebut:


Sub UnprotectSheet()

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


tutup jendela VBA






Pilih Macro, jalankan dan tungu beberapa saat kemudian akan mucul seperti gambar dibawah ini

jika sudah begitu maka beeem salabim, sheet anda terbuka semua
sudah waktunya sobat follow blog ini, atau apa kek gtu biar blog ini terkenal
heheheeh


sumber
 

0 komentar: