Excécuter macro par double clic

[Eureka]

Bonjour le forum,

Je voudrais lancer une macro nommée Créer_choix
par un double clic si la cellule cliquée se trouve dans la plage A12:A30.

Je vous remercie par avance pour vos réponses.

 

[Robert]

Bonjour Eureka, bonjour le forum,

Je te propose cette macro événementielle à placer dans un composant WorkSheet dans Visual Basic Editor (Feuil1(Feuil1) par exemple) :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

'condition : si l'intersection de la cible et de la plage A12:A30 n'est pas vide
'autrement dit, si le double clic de fait dans la plage A12:A30
If Not Application.Intersect(Target, Range('A12:A30')) Is Nothing Then
Call Créer_choix 'appelle la macro Créer_choix
Cancel = True 'évite le mode édition lié au double clic
End If 'fin de la condition

End Sub

 

[Eureka]

Merci Robert, ça marche parfaitement.

@ bientôt

 

[Bolinette]

Re : Excécuter macro par double clic

Merci encore pour votre aide, ce forum est vraiment efficace !!