Dim i As Integer, j As Integer, k As Integer Show 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 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 Next: Next: Next: Next: Next: Next Next: Next: Next: Next: Next: Next Info Menarik – Untuk mengamankan file Office Excel agar tidak sembarangan orang bisa mengubah datanya maka kita proteksi dengan membuat password. Karena jika file Office Excel telah kita password (Protect Sheet) maka sedikitpun orang lain tidak akan bisa mengubah file tersebut kecuali mengetahui passwordnya. Lalu bagaimana jika suatu saat kita sendiri lupa akan password tersebut? Sehingga kita sendiri kesulitan untuk kembali mengubah (edit) file Office Excel. Jangan khawatir karena disini saya akan memberikan cara mudah untuk membuka kembali proteksi password file Office Excel tersebut. Cara ini sama sekali tidak perlu menggunakan software lainnya. Kita cukup menggunakan Microsoft Office Excel saja untuk melakukan Unprotect Password tersebut.
Banyak alasan untuk membuka proteksi password Office Excel, misal seperti yang sudah saya terangkan sebelumnya yaitu karena lupa. Atau bahkan mungkin kita menemukan file Office Excel yang harus kita edit datanya sedangkan file tersebut menggunakan proteksi oleh orang lain. Kemudian kita kesulitan untuk menanyakan password tersebut kepada orang yang telah membuat passwordnya. Maka solusi satu-satunya adalah dengan melakukan cara yang akan saya bahas pada artikel ini. Yang kita butuhkan untuk melakukan Unprotect Office Excel hanya serangkaian script atau kode saja. Kode tersebut berfungsi untuk menghilangkan proteksi pada file Office Excel. Cara kerjanya sangat simple dan tidak akan membutuhkan waktu lama untuk melakukannya. Berikut Cara Membuka Proteksi Password Office Excel Tanpa SoftwareBiasanya jika kita membuka file Office Excel yang telah menggunakan password (proteksi) maka ketika kita melakukan klik ganda pada salah satu kolom atau baris layar kerja akan tampil peringatan seperti ini: Itu tandanya adalah file Office Excel yang sedang kita buka menggunakan proteksi oleh pembuatnya. File tersebut sama sekali tidak akan bisa kita edit sebelum kita membuka atau menghilangkan proteksinya. Sementara selama file masih menggunakan proteksi, maka file tersebut hanya bisa kita baca dan lihat saja.
Kemudian jika kita lihat di menu Review maka akan jelas terlihat pada bagian Changes tertera tulisan Unprotect Sheet. Fitur itu fungsinya adalah untuk membuka proteksi password Office Excel. Masalahnya jika kita tahu passwordnya maka tidak akan pusing dengan hal ini. Namun jika sebaliknya kita lupa atau tidak tahu karena file ini dibuat oleh orang lain lalu bagaimana? Santai saja dan saya yakin jika Anda sudah selesai membaca artikel ini maka Anda akan tersenyum sendiri. Karena ternyata untuk mengatasi masalah ini sangatlah mudah. 1. Aktifkan Microsoft Visual BasicCaranya silakan Anda buka file Office Excel yang telah menggunakan proteksi tersebut kemudian Anda tekan Alt+F11 pada keyboard. Fungsi tombol kombinasi Alt+F11 ini adalah untuk mengaktifkan layar kerja Microsoft Visual Basic. Kemudian Anda klik pilih menu Insert dan Module. 2. Copy Paste Script UnProtect ke ModuleAnda copy kode berikut ini dan paste-kan pada layar kerja Module yang tadi telah Anda aktifkan. 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 3. Pilih Sheet yang Menggunakan ProteksiLangkah selanjutnya adalah Anda klik pilih Sheet yang terdapat password atau yang akan kita jebol proteksinya. Pada contoh ini saya akan membuka proteksi Sheet yang bernama Contoh. Kemudian Anda klik pilih lagi tombol Run Macro atau lebih cepat lagi Anda bisa menekan tombol F5 pada keyboard. Sekarang yang tampil adalah kotak dialog Macros dengan perintah InternalPasswords. Pada langkah ini tidak banyak yang harus Anda lakukan, kita cukup klik pilih Run. Tunggu beberapa saat karena kode yang telah kita benamkan pada Module tadi sedang bekerja untuk menghilangkan proteksi file Office Excel. Lamanya proses Run Macro ini tergantung ukuran file Office Excel yang sedang Anda Unprotect. 4. SelesaiJika proses Run Macro sudah selesai dengan sempurna, silakan Anda tutup (close) layar kerja Microsoft Visual Basic dan kembali perhatian pada layar kerja Sheet yang semula menggunakan proteksi. Anda lihat menu Review, jika sudah berubah menjadi Protect Sheet maka proses membuka proteksi password Office Excel ini telah sukses. Silakan Anda coba untuk mengedit atau melakukan perubahan pada layar kerja file Office Excel tersebut. Saya yakin sekarang file Office Excel sudah tidak menggunakan password lagi.
Bagaimana mudah bukan? Silakan selamat mencoba trik Membuka Password Office Excel ini. Semoga Anda berhasil melakukannya dan saya harap gunakan trik ini untuk tindakan yang baik bukan untuk menjebolkan file Office Excel orang lain yang sudah sengaja melindunginya dengan proteksi. Salam hangat dan sampai bertemu lagi pada artikel menarik lainnya. Untuk membuka proteksi jika Module tidak aktif, bisa menggunakan cara berikut: Cara Membuka Password File Excel Dengan Menghapus Segmen “SheetProtection” Bagaimana cara membuka Excel yang terkunci?2. Cara Membuka File Excel dengan Properties. Silahkan cari dan tentukan file excel yang tidak bisa di edit tersebut.. Lalu klik kanan dan pilih propertis.. Selanjutnya, pada bagian bawah kanan, klik tombol unlock.. Sampai disini file excel tersebut sudah bisa di edit.. Bagaimana cara membuka file Excel yang tidak bisa terbuka?Memperbaiki buku kerja yang rusak. Klik File > Buka.. Klik lokasi dan folder yang berisi buku kerja yang rusak.. Dalam kotak dialog Buka, pilih buku kerja yang rusak tersebut.. Klik panah di samping tombol Buka, lalu klik Buka dan Perbaiki.. Untuk memulihkan sebanyak mungkin buku kerja, pilih Perbaiki.. Kenapa Microsoft Excel terkunci?Jika file terkunci sendiri, mungkin karena file terbuka di perangkat lain, atau file sebelumnya tidak ditutup dengan benar. Tips: Terkadang, file mungkin dikunci jika semua orang mengedit tidak menggunakan versi yang mendukung penulisan bersama.
Apa itu Protected View di Excel?Protected View adalah fitur yang dimiliki Excel untuk memberikan perlindungan bagi pengguna terhadap dokumen yang diunduh dari internet. Fitur ini ada pada Microsoft Excel 2013 dan versi terbarunya.
|