Pages

Ads 468x60px

10 Mei 2014

Cara menampilkan Password Proteksi Sheet di Ms. Excel


Banyak di antara kita yang mendapatkan file excel untuk keperluan tertentu dengan proteksi sheet di dalamnya. Dengan di proteksi maka user atau kita yang meng-copy file tersebut tidak bisa melakukan perubahan atau yang edit yang lainnya di file tersebut.
Masalahnya adalah jika kita harus menambahkan atau memperbaiki file tersebut …. ?
Jalan satu – satunya adalah kita hilangkah proteksinya.
Berbekal petunjuk ini maka kita bisa dengan mudah menampilkan Password proteksinya.

Caranya dengan mengaktifkan Macro di Ms. Excel.
1. Buka file excel yang di password untuk proteksi sheet nya.
2. Tekan Alt + F11.
3. Klik Insert – Module
4. Paste kode di bawah ini .
Sub PasswordBreaker()
‘Breaks worksheet password protection.
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)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
Jangan melakukan perubahan pada kode di atas.
5. Jalankan dengan cara teken tombol F5
6. Tunggu beberapa saat, password akan di tampilkan dalam PopUp di file excel.
Selamat semoga berhasil dan bermanfaat.

0 komentar:

Dapatkan Uang dengan Join disini, GRATIS

Dukungan ku pada Indonesia

Cari Uang di Internet, klik disini

 

Sample text

Sample Text

Sample Text