Probleme de chevauchement de macro.

Bonjour,

J'utilise la fonction Private Sub worksheet_change pour detecter un changement dans ma feuille, pour ensuite venir ecrire dans dans des cellules de cette meme feuille.
Le probleme est que dés que je viens ecrire dans la cellule la macro se relance, car elle detecte un changement dans la feuille.
Existe t'il un moyen de bloquer la detection durant l'execution de la macro.

au début de ta macro

Code:

---

Application.EnableEvents = False

---

n'oublie pas de le mettre a true a la fin

Edite petite précision
Si ta macro plante avant le passage a True. Les macro événementiel ne seront plus lancé. Pendant le développement fait toi une petit macro avec juste

Code:

---

Application.EnableEvents = True

---

Et lance la après chaque plantage
Tu peux aussi faire de la gestion d'erreur mais je trouve que pendant la phase de développement du code ce n'est pas très pratique de ne pas avoir la ligne qui pose problème

bonjour zeralium le forum pas simple comme cela sans plus d' infos!!
regarde deja du côte de

Code:

---

Application.EnableEvents = False

---

ps oups bonjour l' ami krovax plus rapide que moi bisous a+

Salut
Je structures mes macro ainsi :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Err_Change 'déclarations =============== 'MEI ======================== Application.EnableEvents = False Application.ScreenUpdating = False 'Traitement ================== 'sortie ====================== Sort_Change: Application.EnableEvents = True Application.ScreenUpdating = True Exit Sub 'Traitement des erreurs ====== Err_Change: MsgBox Err.Description, , "Erreur Excel N°" & Err.Number Resume Sort_Change End Sub

---

Oui, je sais c'est lourd. mais en cas de problème, je gagne du temps :P
A+

Merci pour votre aide precieuse, j'aurais du penser à

Code:

---

Application.EnableEvents = False

---

Par contre merci Gorfeal, qui m'as donné une bonne methode pour structurer mes programmes.