Problème avec un combobox_change

Bonsoir les experts d'excel !

J'ai un petit problème de macro et de combobox qui m'embête depuis hier....

Dans un userform j'ai une première combobox qui va alimenter une 2e selon la valeur entrée dans la 1e combobox (en filtrant une feuille dans le classeur).

Le problème c'est que le code "redémarre" des que je fais une modification sur le classeur j'ai l'impression, chose que je ne comprends pas du tout et c'est pourquoi j'ai besoin de vos lumières ^^'

Voici le code qui redémarre une fois la ligne 10 lancée (avec le step by step F8).

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub ComboBox1_Click()   Application.ScreenUpdating = False   If userform1.ComboBox1.Value = "" Then MsgBox ("......") Exit Sub End If   Sheets("listes").Range(Sheets("listes").Cells(2, 19), Sheets("listes").Cells(1000, 24)).Value = ""

---

Je suis dans le coin s'il faut d'autres précisions. En attendant bon week end du 14 juillet à tous.

Bonjour,

je ne sais pas si j'ai été confronté au même problème que vous mais...
j'ai remarqué qu'il y a des composants "sensibles" aux modifications concernant la feuille où il se trouve.

Des évènements click sont générés de façon intempestive, lorsque l'on entre une valeur dans une cellule, ou lorsque l'on sélectionne une feuille :?
D'après mon expérience, la raison principale serait un calculate.
Ce qui veut dire que si votre classeur est en calcul automatique, à chaque fois que vous entrez une valeur dans une cellule obligeant EXCEL à recalculer d'autres cellules, un ou plusieurs évènements click sont générés.

Bref, n'ayant jamais trouvé la raison du phénomène, et donc supprimer la cause, je procède comme suit:
1: je désactive systématiquement le calcul automatique de mes classeurs ( Cela peut se faire par macro)
2: A chaque début de fonction de traitement de clic, je passe par un test sur un drapeau qui inhibe éventuellement le traitement qui suit
3: Avant chaque lancement d'un calcul de feuille, j'active le drapeau d'inhibition
4: je désactive le drapeau d'inhibition après une phase de calcul.

Cela donne par exemple dans la classe ThisWorkbook:

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub Workbook_Activate() With Application .Calculation = xlCalculationManual .CellDragAndDrop = False .EnableAutoComplete = False End With   ThisWorkbook.verrou_click = False ' Autorise à nouveau les traitements de Cbx_xxx_Click pour ce classeur End Sub

---

verrou_click est une variable boléenne générale au classeur, accessible à toutes les autres classes de celui-ci.

Puis dans les autres feuilles, par exemple:

Code:

---

1 2 3 4 5

Private Sub Cbx_Adherent_Click() If ThisWorkbook.verrou_click = True Then Exit Sub ' Ne fait pas de traitement si le verrou est activé End If /.../

---

Enfin dans d'autres parties, avant un calcul:

Code:

---

1 2 3 4 5 6 7 8 9 10

Application.ScreenUpdating = False ThisWorkbook.verrou_click = True   /.../   ActiveSheet.Calculate     ThisWorkbook.verrou_click = False Application.ScreenUpdating = True

---

En espérant que je ne sois pas hors sujet...

Bonjour rtg57,

Merci de votre réponse, cela à l'air de marcher :ccool:

J'avoue ne pas trop comprendre comment fonctionne le verrou_click, mais la désactivation du calcul automatique suffit à régler mon problème.

Encore merci et à bientôt.

Bonjour,

content pour vous ;)

Le verrou_click est simplement une variable booléenne qui est activée avant de lancer un calculate.
Car tôt ou tard, il faudra bien effectuer un 'calculate' pour permettre à EXCEL de calculer les résultats des formules.
Cette opération va déclencher des 'click' intempestifs.
Cette variable à l'entrée de chaque fonction traitant des évènements 'click', empêche de dérouler le programme contenu dans ces parties.
Cela joue comme une inhibition des évènements.