Tutorial ini saya buat berdasarkan pengalaman pribadi saya yang menemukan file Excel yang Sheetnya Terkunci, sehingga file tersebut tidak dapat di edit maupun dirubah Nilainya.... ini sungguh membuat saya sangat kesal dan coba cari tau bagaiman membuka/membobol passsword EXCEL SHEET nya.... kemudian saya coba googling dengan berharap dapat Membuka atau Membobol Password tersebut dan akhirnya saya menemukan caranya.... sehingga Melalui Blog Ini saya Akan Berbagi bagaimana Cara Membobol atau Membuka File Yang Sheetnya diberikan password. Begilah caranya.... 1. Bagaimana Sebenarnya File Yang Diberikan Password??? caranya adalah : pertama buka file excelnya, kemudian pada menu bar Excel cari Review. jika ada tertulis Unprotect Sheet maka sudah pasti file tersebut dalam keadaan terkunci dan diberikan password dan sebaliknya Jika Tertulis Protect Sheet maka file tersebut terkunci atau Free Password. Berkut ini: Contoh. Screen dari File yang Diberikan Password: 2. untuk membobol pass tersebut maka kita akan mengunakan script sederhana yang ampuh untuk menghapus pass tersebut. Gunakan Tombol Kombinasi Short Cut Untuk membuka Microsoft Visual Basic dengan menekan Tombol ALT + F11, maka akan muncul jendela baru untuk Microsoft Visual Basic..... Gambar. Microsoft Visual Basic 3. Kemudian pada Tool Klik Insert/Module, maka akan Muncul File Module1 4. Double Clik pada Module 1 maka akan muncul jendela baru untuk memasukkan script..... 5. Copy Pastekan Script Berikut Ini Ke Excel anda: Mulai Dari Sub Internal s/d end sub 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 Gambar. Hasil Akhir 6. Setelah itu selesai anda lakukan maka langkah selanjutnya adalah Runing Scirpt tersebut. caranya alihkan Kursor pada Sheet1 (atau sheet yang terkunci) kemudian tekan tombol F5 maka akan muncul jendela RUN. kemudian Klik saja RUN. Tunggu beberapa saat Sampai proses selesai dan setelah selesai maka File Excel yang ada Password Akan Hilang.... hahahahahaa..... Sekian... http://www.jarkom-iwanriopurba.web.id/2013/12/cara-membobolmembuka-password-excel.html

0 komentar:

Posting Komentar

 
Top