Double-clic sur shape

[daniel1949]

Bonjour à tous,
J'ai établi une macro qui par l'intermédiaire d'un rectangle à coins arrondis envoie dans une cellule le chiffre 1. Je voudrais savoir s'il est possible par un double clic sur ce rectangle de renvoyer le chiffre 0 dans cette même cellule (soit premier clic = 1, deuxième clic = 0) ?.
Merci de vos réponses
Daniel

 

[Pierrot93]

Re : Double-clic sur shape

Bonjour Daniel,

regarde peut être ceci :

ActiveCell = IIf(ActiveCell = 0, 1, 0)

bonne journée
@+

 

[daniel1949]

Re : Double-clic sur shape

Bonjour Pierrot,
J'ai vu, j'ai essayé et ça marche !
Mille merci et bonne journée.