Bonjour à tous et merci pour le forum.

je cherche à créer un seul bouton "Aide" avec une forme simple contenant un "?"
Ce que je souhaite c'est lorsque je clic dessus la 1ère fois le bouton devienne jaune et tous les commentaires de la feuille s'affichent
Si je clic une nouvelle fois sur ce même bouton il redevient noir et les commentaires se masquent
Je n'arrive pas à afficher ou masquer tous les commentaire d'un seul coup sinon cela me met une erreur..
Voici où j'en suis pour l'instant et en fouillant les forums j'ai toujours pas trouvé mon bonheur :

Pour afficher :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Sub comment()
Range("v5").comment.Visible = True
End Sub
Pour masquer
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Sub comment()
Range("v5").comment.Visible = False
End Sub
et bien évidement si je clic de nouveau je veux que cela recommence du départ

Merci pour votre aide

Bonne journée