마이크로소프트 엑셀 비밀번호

마이크로소프트 엑셀 비밀번호

약 1년 전에 만든 두 개의 Excel 파일이 있습니다. 두 파일 모두 보호됩니다.

  • 올바른 비밀번호를 입력하지 않으면 하나의 Excel 파일을 열거나 편집할 수 없습니다.
  • 그리고 다른 Excel 파일에서는 일부 특정 셀에서 시트 보호가 활성화됩니다.

두 가지 유형의 비밀번호를 복구하기 위한 몇 가지 도구를 다운로드했지만 어떤 도구도 성공적으로 작동하지 않았습니다. 또한 나는 겪었다엑셀 비밀번호 복구. 이 링크에 언급된 도구가 작동하지 않았습니다.

알려주세요. 어떻게 해결하나요?

문안 인사

인테크

답변1

열 수 있는 파일의 경우 다음을 시도해 보세요.

툴바에 "개발자"가 표시되지 않는 경우:

Microsoft Office 단추 Office 단추 이미지 를 클릭한 다음 Excel 옵션, PowerPoint 옵션 또는 Word 옵션을 클릭합니다.

인기를 클릭한 다음 리본에 개발자 탭 표시 확인란을 선택합니다.

Alt+F11을 누르거나 개발자 탭에서 Visual Basic을 클릭하여 VBA 편집기를 불러옵니다. 눈금자가 있는 버튼 옆에 있는 화살표를 클릭하여 새 매크로를 만듭니다. 모듈 생성

다음 코드를 복사하여 새 모듈에 붙여넣습니다.

    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를 눌러 저장한 다음 VBA 편집기를 닫습니다.

통합 문서에서 개발자 탭으로 이동하여 매크로를 클릭하세요. PasswordBreaker를 선택하고 실행을 클릭합니다.

나는 이것을 몇 가지 다른 워크시트에서 테스트했는데 효과가 있는 것 같습니다. 귀하의 마일리지가 다를 수 있습니다.

관련 정보