CARA MEMBUKA PASSWORD PADA SHEET EXCEL YANG DI PROTEKSI

Demi keamanan data yang telah dibuat, biasanya yang dilakukan oleh user adalah dengan memberi password pada file yang dibuatnya. Dengan demikian maka tidak semua orang bisa membuka file tersebut dan digunakan seenak hatinya sendiri. Data-data yang diprotect tersebut biasanya berupa data-data penting yang tidak semestinya diubah oleh orang yang tidak berkepentingan didalamnya. Pada data yang dibuat di Ms Excelpun dapat diprotect atau diamankan dengan diberi sandi atau password untuk dapat mengedit atau merubahnya. Biasanya yang sering diberi password adalah sel (cell) yang terdapat rumus tertentu yang tidak boleh dirubah sembarangan. Ketika anda akan mengubah data di cell yang diprotect, akan muncul jendela agar memasukkan password.

Password tersebut ketika baru saja dibuat, akan aman-aman saja alias akan masih tetap teringat dikepala. Namun bila file tersebut sudah lama tidak dibuka karena terdapat file-file baru, maka bisa jadi password atau sandi yang dulu dibuat menjadi terlupakan. Akibatnya anda sendiri tidak bisa edit file yang telah anda buat sendiri. Untuk mengatasi hal tersebut, anda dapat menggunakan cara dibawah ini.

1. Buka file excel yang cellnya diprotect.

2. Tekan tombol Alt+F11, maka akan muncul jendela Microsoft Visual Basic For Application.

3. Klik insert kemudian pilih Modul

4. Copy code dibawah ini (dari Sub InternalPassword() sampai End Sub) dan paste di jendela modul yang muncul.

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


5. Jika sudah klik save (atau simpan)

6. Masih di jendela Microsoft Visual Basic, klik menu Tools kemudian pilih Macros
 

7. Setelah itu muncul jendela macros dan klik run

 

8. Muncul popup dan klik OK

9. Selamat….. cell yang dikunci sudah dapat dibuka kembali

Sekian uraian tentang CARA MEMBUKA PASSWORD PADA SHEET EXCEL YANG DI PROTEKSI, semoga bermanfaat untuk Bapak/Ibu Guru.