-->
Diberdayakan oleh Blogger.

Rabu, 20 April 2016

Cara Membuka Password Sheet Microsoft Excel Tidak Bisa Diedit atau Diprotect

Pernahkan anda mendapatkan file excel yang sheetsnya diprotect? Lalu anda pusing untuk membuka passwordnya karena tidak diberikan password tersebut oleh sipembuat. Sebenarnya hal demikian tidak perlu kita risaukan karena dengan trik ini kita bisa membuka sheets yang diprotect tanpa perlu mengetahui passwordnya apa.


Baiklah, untuk mempersingkat waktu dan tidak terlalu basa-basi panjang lebar silahkan simak langkah-langkahnya di bawah ini.

1.Pertama buka file excel anda, klik pada menu bar > Review. Perhatikan jika ada tampilan Unprotect Sheet maka sudah pasti file tersebut dalam keadaan terkunci dan diberikan password, sebaliknya jika tampil Protect Sheet maka file tersebut terbuka atau free password.


2. Untuk membobol sheets tersebut maka kita perlu mengunakan script sederhana yang mujarab untuk membuka sheet tersebut. Buka Microsoft Visual Basic dengan cara menekan Tombol ALT + F11, maka akan muncul jendela baru untuk Microsoft Visual Basic.

3. Selanjutnya ketika tampil Microsoft Visual Basic pilih pada menu bar Insert > Module.


4. Silahkan anda copy script berikut Ini ke form module Visual Basic tersebut. Lalu Pada Microsoft Excel Objects pilih sheets mana yang akan anda buka. Seperti contoh Sheet 1.

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. Kemudian anda harus runing scirpt tersebut dengan pilihan Sheet1 tadi (atau sheet yang terprotect), kemudian tekan tombol F5 atau bisa juga dari menu bar Run > Run Macro.


Maka akan muncul jendela RUN > klik RUN. Pilih Macro Name Sheet1.InternalPasswords 


Tunggu beberapa saat hingga proses selesai dan setelah selesai maka sheets Excel akan bisa diedit.


Demikian cara membuka password sheet Microsoft Excel tidak bisa diedit atau diprotect, semoga bermanfaat.
Next article Next Post
Previous article Previous Post