Unprotect Sheet Microsoft Excel - Artikel ini saya tulis karena pengalaman pribadi sering mendapatkan file-file microsoft excel yang tidak bisa di copy atau di edit karena terproteksi sengaja atau tidak sengaja oleh si pembuatnya. Pada kesempatan ini saya akan berbagi cara membuka password atau proteksi pada sheet microsoft excel. Dan ini berguna juga bagi kita yang sengaja memproteksi data-data dalam microsoft excel dengan password tetapi kita lupa dengan passwordnya.
Memang tidak semua file excel yang kita download atau kita buat sendiri perlu untuk di edit ulang, akan tetapi jika kita bertemu dengan file-file excel dan membutuhkan di edit ulang maka akan terasa banget susahnya. Jika kita klik ganda dalam kolom data di excel lalu muncul keterangan seperti gambar di bawah ini :
Sudah bisa dipastikan bahwa file atau data tersebut terproteksi dengan password. Untuk dapat mengedit data tersebut silahkan ikuti langkah-langkahnya di bawah ini :
Membuka Proteksi Pada Microsoft Excel
1. Tekan ALT + F11 untuk memunculkan Microsoft Visual Basic (lihat gambar)
2. Lalu klik Insert dan pilih Module, nanti akan keluar tampilan seperti gambar di bawah
3. Kemudian Copy Paste Kode di bawah ini ke dalam Module yang telah terbuka tadi
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
4. Selanjutnya klik Tools > Macros lalu klik RUN (lihat gambar)
5. Tunggu beberapa saat setelah itu tekan ALT + F11 untuk kembali ke data excel yang terproteksi tadi. Dan kita sudah bisa menikmati hasilnya yaitu sheet sudah tidak terproteksi. Selamat mencoba !!
Pergunakan cara-cara di atas sebagaimana mestinya, jangan disalahgunakan. Jika cara di atas tidak bisa, mungkin sheet yang diproteksi menggunakan software atau cara dari luar angkasa.
Baca juga : Membuat Kotak Admin Dibawah Postingan
Baca juga : Membuat Kotak Admin Dibawah Postingan
Terima kasih sudah berkunjung dan meluangkan waktu untuk membaca artikel
Post a Comment
- Maaf, komentar LINK AKTIV / IKLAN akan saya HAPUS
- Komentar sara / spam akan saya hapus
- Jika ada link gambar yang mati laporkan disini
- Berkomentarlah dengan bijak sesuai dengan artikel
- Komentar anda merupakan undangan buat saya