erreur syntaxe macro

[reno]

Salut!

qqun pourrait me dire pourqui ma premiere macro marche mais pas les macros de tri???

Merci



Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Application.Intersect(Target, Range("A13:A40")) Is Nothing Then

macro1

If Target.Address = "$B$10" Then Call TriRIC

If Target.Address = "$E$10" Then Call TriCOUNTRY

End If

End Sub

 

[LaurentTBT]

Salut.

Le "End if" doit être mis juste après "macro 1", ou alors les if suivants doivent être remplacés par ElseIf

@+, Laurent