Bloquer une macro

bonjour Thierry,

à copier dans un module standard,

Public Bloquer As Integer

Sub BloquerVrai()
Bloquer = 1
End Sub

Sub BloquerFaux()
Bloquer = 0
End Sub

à copier dans sur le module de la feuille,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Bloquer = 1 Then Exit Sub
MsgBox "Bloquer = " & Bloquer 'Vérifier
'suite de la macro
End Sub

isabelle

Bonsoir à tous

Voilà j'ai une macro du type

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Je voudrais une petite macro pour qu'elle ne s'execute pas.
De meme comment faire pour la remettre en service?

Merci d'avance

Thierry

Bonsoir !
Avant la ligne de code qui génère l'exécution non
souhaitée du code, place :
Application.EnableEvents = False
à remettre à true dès que tu veux réactiver les événements.
J'espère que ça répond à ta question...
A+

V.

-----Message d'origine-----
Bonsoir à tous

Voilà j'ai une macro du type

Private Sub Worksheet_SelectionChange(ByVal Target As
Range)

Je voudrais une petite macro pour qu'elle ne s'execute
pas.

De meme comment faire pour la remettre en service?

Merci d'avance

Thierry


.