Ir ao conteúdo
  • Cadastre-se
Mateus Mancebo Machado

RESOLVIDO Macro beforesave

Recommended Posts

Boa tarde pessoal, 


 


sou relativamente novo no VBA e fui aprendendo e montando códigos com o que lia em foruns. Entretanto estou com dúvida que não consigo solucionar.


 


Fiz uma macro para rodar sempre que o botão "salvar" for apertado. Entretanto, ela so está funcionando quando se colocar para "salvar como". Não consegui encontrar os argumentos que possam mudar. Segue a macro abaixo.


 


OBS: A ideia da macro é que apenas as pessoas que possuem a senha consigam salvar/salvar como qualquer alteração.


 


 


Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

senhasalvar = "teste"

If SaveAsUI = True Then

 

        resultado = MsgBox("Para salvar o arquivo è necessário permissão. Você tem permissão?", vbYesNo, "SIM")

        If resultado = vbYes Then

        senha = InputBox("Digite a senha abaixo")

            If senha = senhasalvar Then

            Cancel = False

            Else

            MsgBox "Esta senha não confere.", vbCritical, "Atenção"

            Cancel = True

            End If

        Else

        MsgBox "Procure o responsável da área"

        Cancel = True

        

End If

End If

End Sub

Compartilhar este post


Link para o post
Compartilhar em outros sites


Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

Dim Senha As String, SenhaInput As String

Dim Resultado As VbMsgBoxResult

Senha = "teste"

Resultado = MsgBox("Para salvar o arquivo è necessário permissão. Você tem permissão?", vbQuestion + vbYesNo, "# Pergunta")

If Resultado = vbYes Then

SenhaInput = InputBox("Digite a senha abaixo")

If SenhaInput = Senha Then

Cancel = False

Else

Cancel = True

MsgBox "Esta senha não confere.", vbCritical, "# Erro"

End If

Else

Cancel = True

MsgBox "Procure o responsável da área", vbExclamation, "# Atenção"

End If

End Sub

  • Curtir 1

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora





Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×