executar macro quanto a celua for igual a "correto"

[Eduardo2345]

Boa noite pessoal!

 

Preciso de uma macro que auto executa quando o valor da célula AO8 for igual a "correto".

 

è possível?

 

Desde já agradeço.

 

[Basole]

O valor da célula AO8, é alterada manualmente ou através de formula?  

[Eduardo2345]

@Basole Através de formula.

[Basole]

Envie sua planilha ou um exemplo.

[Eduardo2345]

exemplo: quando o valor da célula A1 for 10 a celula AO8 automaticamente fica "correto".(formula)

 

Daí quero executar uma Msgbox quando AO8 for correto.

[Basole]

Click c/ botao direito sobre sua planilha(aba), selecione exibir código. Em seguida cole o codigo

 

Dim oldval As Variant
Private Sub Worksheet_Calculate()
'exemplo: quando o valor da célula A1 for 10
'a celula AO8 automaticamente fica "correto".(formula)

If Range("A1").Value <> oldval Then

If Range("A8").Value = "correto" Then

MsgBox "Msgbox quando AO8 for correto"

End If

oldval = Range("A1").Value

End If

End Sub

[Eduardo2345]

Muito obrigado.

 

Deu certinho.

[Eduardo2345]

@Basole queria fazer só mais uma pergunta.

 

Ex: quando o valor de alguma célula da coluna H for alterada e a célula AO8 for "correto".

executa msgbox

 

É possível?

 

desde já agradeço.

 

[Basole]

Ex: quando o valor de alguma célula da coluna H for alterada e a célula AO8 for "correto".
executa msgbox 
É possível?

@Eduardo2345 se quando o valor de alguma célula da coluna H for alterada, manualmente. Sim.