Este fórum está sendo desativado

[Pessoa]

Pessoal, precisava que um código onde cada condição ocorresse uma macro seja acionada. Quando determinada celula seja preenchida com um valor colado chama uma macro. Tentei com codigo abaixo mas só realizar a primeira macro. Quando as proximas celulas são preenchidas as demais macros nao sao acionadas

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$L$8960" Then
Call ImportaCadastro2
If Target.Address = "$L$17960" Then
Call ImportaCadastro3
If Target.Address = "$L$26960" Then
Call ImportaCadastro4
If Target.Address = "$L$35960" Then
Call ImportaCadastro5
If Target.Address = "$L$44960" Then
Call ImportaCadastro6
If Target.Address = "$L$53960" Then
Call ImportaCadastro7
If Target.Address = "$L$62960" Then
Call ImportaCadastro8

End If

End Sub

[Falcao98]

Boa Tarde!
Amigo, em vez de usar vários IFs, tenta usar ElseIf. Vai resolver seu caso. Seu código, vai ficar da seguinte forma:

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$L$8960" Then
Call ImportaCadastro2
ElseIf Target.Address = "$L$17960" Then
Call ImportaCadastro3
ElseIf Target.Address = "$L$26960" Then
Call ImportaCadastro4
ElseIf Target.Address = "$L$35960" Then
Call ImportaCadastro5
ElseIf Target.Address = "$L$44960" Then
Call ImportaCadastro6
ElseIf Target.Address = "$L$53960" Then
Call ImportaCadastro7
ElseIf Target.Address = "$L$62960" Then
Call ImportaCadastro8

End If

End Sub

Espero ter ajudado!

[Pessoa]

Maravilha Falcão. MUito obrigado