How to Unprotect Microsoft Excel Sheet without Password
Pagi ini ada seorang rekan yang datang dengan membawa file excel yang tidak bisa diedit, karena diproteksi sheet oleh pembuatnya. Teman saya meminta untuk Membuka Proteksi Sheet Microsoft Excel tersebut, karena tidak tahu passwordnya. Saat mencoba mengedit maka akan muncul peringatan seperti ini.
 |
| “the cell or chart you are trying to change is protected and therefore read-only. TO Modify a protected cell or chart, first remove protection using Unprotect Sheet command (Review tab, Change group). You may be prompted for password”” |
atau ciri lain dari sheet yang diproteksi adalah jika kita lihat pada tab review maka akan ada icon unprotect Sheet
 |
| Icon Unprotect Sheet |
File tersebut hanya bisa diedit jika kita mengetahui password untuk Unprotect Sheet. Baru sadar ternyata sudah bertahun-tahun tidak bermain-main dengan Sheet Excel yang diproteksi :D. Kalau dulu, biasanya saya menggunakan Open Office untuk mengedit file yang terproteksi, dari hasil percobaan, ternyata proteksi excel tidak berlaku di program lain seperti Open Office, Libre Office dll.
Kebetulan Komputer yang saya gunakan belum terinstall Open Office/Libre Office, sepertinya membutuhkan waktu lama jika harus mendownload dan menginstall program tersebut. Maka dengan bantuan mbah Google, akhirnya bisa menemukan cara membuka proteksi Sheet Excel dengan menggunakan VB (Visual Basic) Script.
Berikut ini adalah step by step Membuka Proteksi Sheet Microsoft Excel dengan menggunakan VB Script:
- Buka file excel yang di proteksi
- Tekan tombol kombinasi “ALT+F11″
- Klik Insert > module
- copy paste-kan code berikut ini:
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. Klik pada sheet atau workbook yang akan kita buka password-nya
6. Klik Macro > Show Macro > Internal Password > Run
7. Tunggu beberapa saat (tergantung besar kecil ukuran File)
8. Jika proses sudah selesai, maka anda sudah bisa mengedit file tersebut dengan leluasa. Untuk mengecek apakah file masih terproteksi bisa juga dilihat di tab Review, maka icon Unprotect Sheet sudah berganti menjadi Protect Sheet.
Semoga bermanfaat jika suatu saat anda lupa password proteksi sheet atau membutuhkan mengedit file yang ternyata diproteksi.
->
English 
Indonesian 
German 
French 
Chinese 
Spanish 
Portuguese 
Japanese 
Turkish 
Russian 
Arabic 
Italian 
Korean 
Dutch
thanks gan sangat membantu 🙂
thank you very much ... work gan
both..thanks for visiting 🙂
both..thanks for visiting 🙂
great.....successful
Just sharing, the way I do it is only 3 steps, check here, http://binderone.blogspot.com/2015/02/3-step-open-sheet-cell-protection.html or youtube https://www.youtube.com/watch?v=gpQjmdTLoI0
Thanks ,....
Trimks is very helpful
my other writings are at http://www.comparazi.com
manztabb
Thanks a lot gan...help our work
thanks....simple and effective
What if VB is also in the password?
gan mine can't insert module cz in VB it still has password kira" gmana how?
This is to remove the protection directly, what if you want to know the password... can you use the method above?
please, thank you your article is very helpful for my work. continued success
This comment has been deleted by the blog administrator.
This comment has been deleted by the blog administrator.
Why after clicking insert, the module is not active?
This comment has been deleted by the author.
nice tutorial. thank you
If what is protected is the vb project, is there any way gan?
that's because the vbProject is also protecked.
thanks gan (y) 🙂
matur nuwun kang....helped by the knowledge that you share....salut n success bwt akang...
How come mine is just running around,
I've tried the same method but the content is different and it's still running...
(office position 2016)
thank you so much.... my files can be edited without asking to be resent by suppliers who are stingy in providing data, using all the protection....heheeee
Thank you...
Thank you so much jazakalloh khairan katsiraa..... so helpful. ikah muh bjr
Sub PasswordBreaker()
'Breaks worksheet password protection.
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
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 ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
If the mudulnya can't do it bro
Great, very helpful
it works.
Thank you.
very helpful
Very useful knowledge, thanks gun I have tried it very helpful.
Thanks Gan. Very useful
Great gan...I tried and it worked. thanks.
o yes, stop by my blog once in a while...
http://topafiliasiindonesia.blogspot.co.id/
thank you very much mas very helpful 🙂
ok gan...steady work...thanks a lot
thank you very much mas....success always
gan, ask ya, if the module insert can't be opened gmn gan?
@Akhy Abdoen Jamiel: Passworded? Try opening it using libre office if you have it
Every time it runs .. not responding continues gan .. how is the solution?
SAYAMAH CAN'T DO IT
REALLY HARD OR THE FILE IS TOO BIG
sorry gan can't work on my computer. what is the solution?
sorry gan can't work on my computer. what is the solution?
great...tq
thank you very much friend
very helpful
Can't module, can't click either.. what's wrong?
because the VBA is still protected, so the module can't be used.