Notifications
Clear all

Executar macro ao alterar valor da célula

3 Posts
1 Usuários
0 Reactions
12.3 K Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Caros, boa tarde.

Como faço para executar uma macro que vou chamar de TESTE, sempre que o valor da célula A1 for alterado ?

Agradeço desde já por sua ajuda.

abraço!

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/12/2011 11:27 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Sia,

veja se é isto :

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Address = "$A$1" Then
        
        Call Teste
        
        Exit Sub
    
    End If
    
End Sub

Sub Teste()
    MsgBox "Alterou A1, coloque sua rotina aqui"
End Sub

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/12/2011 11:59 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Falaaaaa

Amigo, era exatamente isso. Resolveu de cara meu problema.
Tava perdedno um tempão nisso e nada.

Muito obrigado pela ajuda.
Perfeito.

valeu !

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/12/2011 1:21 pm