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
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”
tadi dan copy di sini
5. Selanjutnya klik menu tools dan pilih ”macros”
Selesai, semoga bermanfaat.....amin.