CARA MEMBUKA APLIKASI SHEET EXCEL YANG DI PROTECT/TERKUNCI

Microsoft Excel atau Microsoft Office Excel adalah sebuah program aplikasi lembar kerja spreadsheet yang dibuat dan didistribusikan oleh Microsoft Windows dan Mac OS. Aplikasi ini memiliki fitur kalkulasi dan pembuatan grafik yang, dengan menggunakan strategi marketing Microsoft yang agresif, menjadikan Microsoft Excel sebagai salah satu program komputer yang populer digunakan di dalam komputer mikro hingga saat ini. Bahkan, saat ini program ini merupakan program spreadsheet paling banyak digunakan oleh banyak pihak, baik di platform PC berbasis Windows maupun platform Macintosh berbasis Mac OS, semenjak versi 5.0 diterbitkan pada tahun 1993.

Seringkali aplikasi dalam bentuk excel ini di Protect atau di pasword oleh pembuatnya pada bagian Sheet. Tentu saja hal ini akan mempersulit kita ketika ingin mengedit cell tersebut. Lalu apakah ada tips agar kita bisa leluasa mengubah format-format sesuai keinginan?

Dengan ini penulis akan memberikan petunjuk caranya dibawah ini:

1   1.  Kode script VBA nya:

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

2    2.   Buka aplikasi excel yang di protect

3    3.   Selanjutnya pada sheet excel yang di protect, klik kanan kursor anda lalu pilih ”view code”

4    4.  Pada halaman microsoft visual basic di dalam book sheet code masukkan script VBA yang di nomor 1
           tadi dan copy di sini

      5.  Selanjutnya klik menu tools dan pilih ”macros”

6    6.  Langkah terakhir klik tombol ”run”

 

Selesai, semoga bermanfaat.....amin.