Problème utilisation worksheet_change

[remady]

Bonjour tout le monde,

Ceci n'est pas mon premier post comme ca en à l'air, mais j'ai changé de compte suite à un problème de mail. Quoi qu'il en soit, j'adore ce forum et je ne le changerai pour rien au monde 😀
Bref j'aurais besoin de votre expertise pour régler un petit problème qui à priori n'est pas très compliqué à résoudre j'ai un peu de mal avec l'utilisation de worksheet_change, J'ai donc besoin d'exécuter des macros automatiquement après changement de valeurs de certaines cellules, mais je n'arrive pas à inclure 2 conditions à la fois, ca ne marche que si j'en mets qu'une. Comment faire dans ce cas là ??

Merci de votre aide

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, Range("B2:C2")) Is Nothing Then: Exit Sub
Call Feuil5.macro1

If Intersect(Target, Range("B3:C3")) Is Nothing Then: Exit Sub
Call Feuil5.macro2

End Sub

 

[porcinet82]

Re : Problème utilisation worksheet_change

Salut,

Qu'est ce qui ne fonctionne pas au juste ? Et comment veux-tu que tes macros soient exécutées ?
Je ne sais pas vraiment ce que tu souhaites faire, mais peut etre comme ceci :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B2:C2")) Is Nothing Then
     Call macro1
     Exit sub
Enf If
If Intersect(Target, Range("B3:C3")) Is Nothing Then
     Call macro2
     Exit Sub
End If
End Sub

@+

 

[tototiti2008]

Re : Problème utilisation worksheet_change

Bonjour remady,

peut-être envisager la problématique dans l'autre sens

[B]Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("B2:C2")) Is Nothing Then Call Feuil5.macro1

If Not Intersect(Target, Range("B3:C3")) Is Nothing Then Call Feuil5.macro2

End Sub[/B]

 

[remady]

Re : Problème utilisation worksheet_change

Re,

tototi, ta proposition résous mon problème merci beaucoup, merci à porcinet aussi. Bien que je ne comprends pas pourquoi mon code marchait pas, puisque je n'avais aucune erreur sauf que seule la première condition était prise en compte.
a+

 

[tototiti2008]

Re : Problème utilisation worksheet_change

Bonjour Porcinet
Re,

c'est normal

si tu modifie B3 par exemple
Ton code dit : ce n'est pas dans B2:C2 alors je sort et je ne fait rien
Mon code dit : Ce n'est pas dans B2:C2, je ne fait pas la 1ère partie, mais je continue pour tester la seconde...

Edit : Le code de Porcinet fonctionne aussi, la différence légère est si on modifie B2 et B3 en même temps par exemple (Avec un Coller ou un Suppr...)

 

[remady]

Re : Problème utilisation worksheet_change

ahh Ok OK, merci pour les explications complémentaires, c'est toujours utile 😀