Kata Sandi Microsoft Excel

0

Saya memiliki dua file excel yang saya buat sekitar setahun yang lalu. Kedua file dilindungi.

  • Satu file excel tidak dapat dibuka / diedit tanpa memasukkan kata sandi yang benar.
  • Dan di file excel lain, Protect Sheet diaktifkan pada beberapa sel tertentu.

Saya mengunduh beberapa alat untuk memulihkan kedua jenis kata sandi tetapi tidak ada alat yang berhasil. Juga saya telah melalui Pemulihan Kata Sandi Excel . Alat yang disebutkan dalam tautan ini tidak berfungsi.

Tolong beri tahu saya, bagaimana cara memperbaikinya?

Salam

InTech

InTech
sumber
Anda mengatakan "Satu file excel tidak dapat dibuka / diedit tanpa memasukkan kata sandi yang benar.", Yang mana itu? Bisakah Anda membuka file? Juga, apakah Anda memiliki pengalaman VBA?
jrichall
Sepertinya Anda mencoba menggunakan alat dalam menjawab pertanyaan yang Anda tautkan, tetapi apakah Anda mencoba metode dalam pertanyaan yang ditandai duplikat? Coba jawaban yang diberikan di sini dan lihat apakah itu berhasil.
jrichall
Dalam versi Excel apa Anda membuat file yang dilindungi kata sandi, yaitu file yang tidak akan terbuka kecuali Anda memberikan kata sandi yang benar?
patkim
Seperti yang saya sebutkan, saya memiliki dua file excel dan saya percaya itu dibuat pada edisi 2007. Saya tidak bisa membuka satu file excel dan saya bisa membuka file excel lainnya tetapi Protect Sheet diaktifkan di file ini. Saya tidak tahu tentang VBA. Saya mengunduh beberapa perangkat lunak tetapi tidak ada perangkat lunak yang berfungsi.
InTech
Maaf atas tanggapan yang terlambat, saya tidak mendapat pemberitahuan. Saya rasa saya memiliki sesuatu yang akan membantu dengan file yang dapat Anda buka. Masih mencari yang Anda tidak bisa. Saya akan mengirim jawaban segera.
jrichall

Jawaban:

0

Untuk file yang BISA Anda buka, coba ini.

Jika Anda tidak melihat "pengembang" di bilah alat Anda:

Klik gambar tombol Microsoft Office Button Office, dan kemudian klik Opsi Excel, Opsi PowerPoint, atau Opsi Kata.

Klik Populer, lalu pilih tab Tampilkan Pengembang di kotak centang Pita.

Tekan Alt + F11 (atau klik Visual Basic di tab pengembang) untuk membuka editor VBA. Buat makro baru dengan mengklik panah di sebelah tombol dengan penggaris di atasnya: Buat Modul

Salin kode berikut dan rekatkan ke modul baru Anda:

    Sub PasswordBreaker()
    'Author unknown
    '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

Ctrl + S untuk menyimpan, lalu tutup editor VBA.

Di buku kerja Anda, buka tab pengembang dan klik pada makro. Pilih PasswordBreaker dan klik Jalankan.

Saya telah menguji ini di beberapa lembar kerja yang berbeda dan sepertinya berhasil. Jarak tempuh Anda mungkin beragam.

Jrichall
sumber