Página 1 de 1
Mostrar mensagem quando A1 for alterado para 1
Enviado: 31 Mar 2016 às 11:23
por alanisfcsm
Bom dia
Como posso criar um código quem mostre uma mensagem sempre que a célula A1 for alterado para 1.
Deve ser simples, mas estou todo enrolado aqui....
Re: Mostrar mensagem quando A1 for alterado para 1
Enviado: 31 Mar 2016 às 12:29
por Kledison
Boa tarde,
verifica no exemplo se é o que precisa.
Re: Mostrar mensagem quando A1 for alterado para 1
Enviado: 31 Mar 2016 às 12:53
por alanisfcsm
Kledison escreveu:Boa tarde,
verifica no exemplo se é o que precisa.
Perfeito!
Agora mais uma pergunta, se eu quiser fazer em mais de uma?
ex. A1, B7, C17
Valeu pela ajuda, muito obrigado!
Re: Mostrar mensagem quando A1 for alterado para 1
Enviado: 31 Mar 2016 às 13:08
por Kledison
Olá,
troque para esse código:
Código: Selecionar todosPrivate Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" And Range("A1").Value = 1 Then
MsgBox "Valor de A1 alterado"
Exit Sub
ElseIf Target.Address = "$B$7" And Range("B7").Value = 1 Then
MsgBox "Valor de B7 alterado"
Exit Sub
ElseIf Target.Address = "$C$17" And Range("C17").Value = 1 Then
MsgBox "Valor de C17 alterado"
Exit Sub
End If
End Sub
veja no exemplo.
Mostrar mensagem quando A1 for alterado para 1
Enviado: 31 Mar 2016 às 13:10
por alanisfcsm
Obrigado! Kledison Lana
Valeu mesmo!
