Private Sub "Calculate" : supprimer ou empêcher la boucle ?

[Nonno 94]

Bonjour le Forum,

je viens vous demander s'il est possible de supprimer la boucle dans la Privare Sub "Calculate" de la feuille Noire "EV Taux Acti + (2)" du fichier joint.


Dans les 2 feuilles, il est possible de saisir une Valeur dans la Cellule "T40" après avoir cliqué sur le bouton situé en "R1".
Il est possible, ensuite, de calculer la valeur "K début" correspondante qui s'inscrira en "AY" et "AX40"
- dans la feuille Rouge "EV Taux Acti +" en cliquant sur le bouton situé en "AX8"
- dans la feuille Noire "EV Taux Acti + (2)" avec la Private Sub "Calculate" pour ne pas avoir à cliquer sur le bouton 1 situé en "AX8".
Malheureusement, dans ce cas, la Macro "Calculate" effectue une boucle !!!

Ma question est donc : est-il possible de supprimer cette boucle et si oui, de quelle façon ?

Je vous remercie pour vos réponses et vous souhaite une bonne fin de journée.
Cordialement.

Nonno 94.

 

[Pierrot93]

Re : Private Sub "Calculate" : supprimer ou empêcher la boucle ?

Bonjour,

pas ouvert ton fichier, mais regarde peut être du coté de la propriété "EnableEvents" :

Application.EnableEvents = False
'ton code
Application.EnableEvents = True

bonne journée
@+