Boa noite,
Existe a chance de uma estrutura com esta dar certo ou é necessário outro tipo de código?
Private Sub cmd_salvar_Click( )
Worksheets(Planilha1).Unprotect Password:="Teste1"
'Código usado para salvar as informações do formulário
Worksheets(Planilha1).Protect Password:="Teste1"
End Sub
A minha tentativa gerou um erro de tipo incompatível.
Obrigado.
Ei, Eduardo! Tudo bem?
Agradeço por aguardar o nosso retorno.
Teste rodar o código com Planilha1 sendo referenciada entre aspas, pois isso pode estar ocasionando o erro de "tipo incompatível" no código.
Private Sub cmd_salvar_Click( )
Worksheets("Planilha1").Unprotect Password:="Teste1"
'Código usado para salvar as informações do formulário
Worksheets("Planilha1").Protect Password:="Teste1"
End Sub
E revise se esse é o nome exato da planilha também. Caso o erro persista, compartilhe a mensagem de erro completa para investigarmos outras soluções.
Espero que dê certo, sempre conte com a nossa ajuda no fórum.
Até mais, Eduardo!
Caso este post tenha lhe ajudado, por favor, marcar como solucionado!