Com a natureza do trabalho de algumas pessoas exigindo alta segurança, definir uma senha para o arquivo de dados é essencial, como no Excel. O artigo a seguir irá orientá-lo em detalhes sobre como definir uma senha para um arquivo do Excel da maneira mais simples com base no Microsoft Excel 2013.

1. Abra os arquivos do Excel que precisam ser protegidos

2. Vá para o arquivo, selecione Informações e depois Criptografar com Senha na Pasta de Trabalho Proteger

3. A caixa de diálogo Criptografar documento é exibida

Por favor, digite a senha que você deseja

E confirme a senha novamente

4. Verifique o sucesso

Feche a janela da planilha que você está usando e reabra, neste momento a janela Senha aparece e você deve digitar a senha para fazer login.

Então, depois de definir a senha com sucesso, talvez você não se lembre da senha que definiu, o que fazer?

Assim como outros aplicativos, também precisamos de algum software de suporte. No entanto, ainda existe uma maneira de você quebrar a senha de uma planilha definida sem nenhum outro suporte

• 1. Abra o arquivo Excel bloqueado

• 2. Abra o Editor do Visual Basic pressionando Alt+F11 com o Excel: 2003,2007,2010. Com o Excel 2013 e superior, selecione Desenvolvedor na barra de ferramentas e, em seguida, selecione Visual Basic Editor

• 3. Selecione a planilha para desbloquear

• 4. Copie o código em

Sub PasswordBreaker()

Se ActiveSheet.ProtectContents = False Então

MsgBox "Sheet '" & ActiveSheet.Name & "' is unprotected!", vbInformation

Senão

If MsgBox("Sheet '" & ActiveSheet.Name & "' está protegido, você deseja desprotegê-lo?", _

vbYesNo + vbQuestion, "Desproteger a planilha ativa") = vbNo Then Exit Sub

Dim i As Integer, j As Integer, k As Integer

Dim l As Integer, m As Integer, n As Integer

Dim i1 como inteiro, i2 como inteiro, i3 como inteiro

Dim i4 As Integer, i5 As Integer, i6 As Integer

Em Erro Continuar Próximo

Para i = 65 a 66: Para j = 65 a 66: Para k = 65 a 66

Para l = 65 a 66: Para m = 65 a 66: Para i1 = 65 a 66

Para i2 = 65 a 66: Para i3 = 65 a 66: Para i4 = 65 a 66

Para i5 = 65 a 66: Para i6 = 65 a 66: Para n = 32 a 126

ActiveSheet. Desproteger Chr(i) & Chr(j) & Chr(k) & _

Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _

Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

Próximo: Próximo: Próximo: Próximo: Próximo: Próximo

Próximo: Próximo: Próximo: Próximo: Próximo: Próximo

Se ActiveSheet.ProtectContents = False Then MsgBox "Sheet '" & ActiveSheet.Name & "' is unprotected!", vbInformation

Fim se

Finalizar Sub

• 5. Execute o programa com o atalho F5
• 6. Confirme a exclusão da senha

Boa sorte !