Wednesday, February 20, 2019
Saat kita berselancar di dunia internet untuk mencari isu yang kita inginkan seringkali kita mendownload aplikasi maupun data yang kita butuhkan.
Salah satu contohnya adalah ketika kita mendownload suatu data yang berbentuk exel dan data tersebut setelah kita buka ternyata tidak sanggup di edit secara keseluruhan.
Hal tersebut bukan alasannya yaitu kesalahan yang terjadi pada computer anda melainkan orang yang mempunyai data tersebut sudah mengunci atau memproteknya dengan memasangkan password yang tidak sanggup untuk kita jangkau.
Kejadian di atas pernah juga saya alami sehingga membuat saya jengkel alasannya yaitu sudah capek-capek mendownload dan paket data yang sudah banyak tercurah spesialuntuk untuk mengambil data yang tidak sanggup di edit. melaluiataubersamaini tragedi itulah maka pada peluang ini saya ingin menyebarkan cara untuk membobol password exel yang terprotek semoga anda sanggup mengedit dan memainkannya sesuka hati anda.
Agar tidak memmembuang-membuang waktu Baiklah eksklusif saja saya jelaskan cara membuka sheet excel yang diproteksi.
File excel yang sheet-nya di protect biasanya tidak sanggup di edit sama sekali, tiruana click seolah tidak berfungsi, pada tab “review” coba anda cek, apabila ada icon file excel bertuliskan unprotect sheet, itu tandanya sheet tersebut di perlindungan oleh pemiliknya atau perlindungan dalam keadaan aktif,
untuk lebih jelasnya lihat screen shoot diberikut ini, gambar di bawah ini memperlihatkan file excel yang sheetnya di proteksi/dipassword sehingga kita tidak sanggup meng-editnya :
Untuk cara membuka protek tersebut maka yang harus anda lakukan yaitu :
- Klik kanan sheet exel yang terprotek
- Kemudian pilih” view code”
- Kemudian akan tampil menyerupai gambar di bawah ini
- Selanjutnya copy pastekan isyarat diberikut ini pada module gres tersebut (copy dan paste mulai dari ” Sub InternalPasswords()” hingga dengan “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
Tampilannya menyerupai gambar diberikut:
- Selanjutnya klik pada sheet yang akan kita buka proteksinya pada pilihan sebelah kiri.
- Kemudian pilih sajian “Run” menyerupai pada gambar di bawah ini
- Kemudian pilih “Run macro”
- Kemudian pilih sheet yang akan di buka proteknya dan selanjutnya klik “Run”
- kemudian tunggu beerapa ketika hingga proses pembukaan perlindungan secara otomatis berakhir
- jika sudah berakhir, silahkan tutup tampilan view code tersebut dan buka kembali file exel yang terkunci tadi,
- hasilnya taraaaaaaaa………exel sudah tidak terprotek lagi.
Silahkan edit dan mainkan sesuka anda.
- Jangan lupa untuk mensave setiap sheet exel yang sudah di buka proteknya
- Lakukan tiruana cara di atas untuk membuka tiap-tiap sheet yang terprotek.
Sekian tutorial cara membuka perlindungan pada sheet exel yang terprotek,semoga artikel ini bermanfaa buat anda yang membutuhkannya.