Arrêter un instructionPrivate Sub Worksheet_Change

[Didier]

Bonjour

Je cherche à arrêter une instruction 'Private Sub Worksheet_Change(ByVal Target As Range)' pendant l'exécution d'une macro car celle ci ralenti énormément la macro de mise à jour.

Merci

Didier

 

[Robert]

Bonjour Didier, bonjour le forum,

Je te propose deux solutions possibles. Soit tu restreins la plage dans laquelle réagit l'événement Change de l'onglet. Cela te permet de n'exécuter le code que sur la partie qui t'intéresse. Dans l'exemple ci-dessous seule la plage A1:A10 est réactive :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range('A1:A10')) Is Nothing Then
'ton code
End If
End Sub

Soit dans la macro tu utilises Application.EnableEvents = False qui empêche l'exécution des macro événementielles. Mais tu n'oublies surtout de le rétablir Application.EnableEvents = True en fin de code.

 

[Didier]

Merci beaucoup pour ta réponse Robert, je pense que ça va m'aider.

A+

Didier