VBA problème avec le Worksheet change

Hello le forum,

Je n'arrive pas à résoudre un problème logique qui découle d'une macro worksheet change.

En gros j'ai un prix liste, un discount et un prix remisé. Ce que je veux c'est de pouvoir saisir un discount et avoir le prix remisé qui se calcul, ou saisir un prix remisé et que le discount se calcul.

Dans mon projet j'ai mes discounts en colonne K et les prix remisé en colonne L.

J'ai placé une macro sur le worksheet change :

-Si on change une valeur en colonne K alors on écris une formule de calcul du prix remisé sur la cellule d'a coté en colonne L.
-Si on change une valeur en colonne L alors on écris une formule de calcul du discount sur la cellule d'a coté en colonne K.

Le problème c'est que quand K change, je fais changer L qui fait changer K, qui fait changer L......

Bref je n'arrive pas à trouver une astuce pour sortir de la macro au bon moment pour éviter cette référence circulaire.

Si quelqu'un a une idée je veux bien.

Merci d'avance

bonjour ALEX, le forum
je sais pas si j'ai bien compris mais si par exemple vous cherchez à doublez pour la colonne B la valeur saisie en colonne A et vous divisez en deux si le saisie en colonne B vous pouvez faire avec
NB : ce n'est que le bricolage d'un autodidacte et débutant VBA

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Not Application.Intersect(Target, Range("A2:A20")) Is Nothing Then Cells(Target.Row, 2) = Cells(Target.Row, 1) * 2 End If If Not Application.Intersect(Target, Range("B2:B20")) Is Nothing Then Cells(Target.Row, 1) = Cells(Target.Row, 2) / 2 End If Application.EnableEvents = True End Sub

---

Bonjour,

Il faut désactiver les évènement au début de ta macro et les réactiver à la fin.
LA syntaxe ressemble à:

Code:

---

application.enableevents=false ' ou true

---

Citation:

---

Envoyé par Alex BI

Le problème c'est que quand K change, je fais changer L qui fait changer K, qui fait changer L......

---

Bonjour,

dans ton évènement worksheet_change, désactive les événements (Application.EnableEvents = False) avant la modification puis réactive les après (après avoir établi quelle colonne a été modifiée) :

désactivation événements
modification formule colonne L
réactivation événements

Et pareil pour l'autre colonne.

Cordialement.

Edit: pris de cours par Halaster. :aie:

Magnifaïk

Merci beaucoup Ecthelion2, halaster08 et BENNASR pour vos réponses.

Bon week end !