Re : Interdire lancement macro si une macro est déjà en cours
Bonjour,
regarde peut etre ceci
Code:
Application.EnableEvents = False
On Error GoTo fin
MsgBox ("Essai")
Sheets("Feuil1").Range("A1") = "essai"
fin:
Application.EnableEvents = True
End Sub
Re : Interdire lancement macro si une macro est déjà en cours
Bonjour David, Pierrot, bonjour le forum,
Le problème avec Application.EnableEvents est que si le code plante alors qu'il a été définit à False, les macros événementielles de fonctionnent plus. Pour éviter ça je préfère l'utilisation d'une variable boléenne :
Code:
Private test As Boolean
Private Sub Worksheet_Change(ByVal Target As Range)
If test = True Then test = False: Exit Sub
test = True
MsgBox ("Essai")
Sheets("Feuil1").Range("A1") = "essai"
End Sub