Notifications
Clear all

Macro com Senha VBA

2 Posts
2 Usuários
0 Reactions
720 Visualizações
(@brunoafs)
Posts: 195
Reputable Member
Topic starter
 

Boa noite,

Estou tentando bolar um jeito de ao clickar em um botão que execute um macro, seja exigido uma senha.

Se, a senha for digitada corretamente o macro é executado, caso contrário exibisse uma mensagem "Senha inválida" e o macro não fosse executado.

Não estou conseguindo fazer.

Deve ser algo bem simples.

Alguém pode me ajudar ?

 
Postado : 09/01/2014 5:43 pm
(@gtsalikis)
Posts: 2373
Noble Member
 

o código para a senha pode ser esse:

Sub Codigo_com_Senha_GT()

Dim Senha1 As String
Dim Senha2 As String
Senha1 = "teste123"

Senha2 = InputBox("Digite a senha para liberar a operação.", "Senha requisitada")

If Senha1 = Senha2 Then

    MsgBox ("Senha correta, liberação concedida.")
    'Coloque aqui seu código

Else

    MsgBox ("Senha inválida. Acesso negado.")

End If

End Sub

Lembre de alterar teste123 para a sua senha, e inclua o seu código na parte onde deixei comentado. Atribua ao botão e faça o teste.

 
Postado : 09/01/2014 6:33 pm