Notifications
Clear all

Mudar valor conforme outra célula

3 Posts
2 Usuários
0 Reactions
1,289 Visualizações
(@celsoyano)
Posts: 75
Trusted Member
Topic starter
 

Boa tarde,
Estou tento dificuldades em executar uma "Private Sub Worksheet_Change(ByVal Target As Range)"

Eu gostaria que toda vez que eu mude qualquer coisa na plan, o Excel verifique se o valor na coluna MG3 é igual a 159, caso seja diferente, a celula AT3 seja igual a "ERRO"
e assim fosse conferido até a linha 100.

Eu sei que dá pra fazer isso com a fórmula SE, mas o q eu quero com isso é q se a pessoal der o comando de deletar a linha por inteiro, possar detectar q há um erro. Usando a fórmula SE na coluna AT, e a pessoa deletando a linha inteira, essa verificação não seria feita.

Por isso eu gostaria que fosse em VBA.

Resumindo seria assim:

MG3 = 159 ???
se sim, então nada
se não, Então AT3 = "ERRO"

MG4 = 159 ???
se sim, então nada
se não, Então AT4 = "ERRO"

....

MG100 = 159 ???
se sim, então nada
se não, Então AT100 = "ERRO"

FIM

Segue arquivo modelo

Obrigado.

 
Postado : 27/02/2013 1:50 pm
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

celsoyano,

Boa Noite!

Já resolvi essa sua dúvida no Fórum Info Online.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 27/02/2013 7:20 pm
(@celsoyano)
Posts: 75
Trusted Member
Topic starter
 

Boa Noite,

Wagner, ficou perfeito!!!!

Muito obrigado pela ajuda

Segue em anexo o Modelo enviado pelo Wagner para consultas

 
Postado : 27/02/2013 8:32 pm