Intervenir sur le menu contextuel

[Philippe]

Bonjour à tous,

je cherche à ajouter ou retirer des options au menu contextuel standard (celui qui s'ouvre lors d'un click droit sur la feuille).
Je sais que c'est possible mais j'ai oublié l'instruction à employer et j'ai beau fouiller dans mes livres, je ne trouve pas...

Merci de votre aide

A+
Philippe

 

[Denis]

Bonjour Philippe et le Forum
ci-joint un petit fichier que j'avais fait sur l'ancien forum
regarde dans this workbook et la correction de Zon, si j'ai bonne mémoire, pour réinitialiser ton menu (sur la feuil1)
Bon courage et @+
Denis

 

[Denis]

Re
désolé
voici le fichier
@+ Denis [file name=SommeSpeciale.zip size=12041]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SommeSpeciale.zip[/file]

 

[Philippe]

Merci Denis,

donc grâce à ton fichier, voici les instructions à utiliser:

' RESET DU MENU CONTEXTUEL 'CELL'
Sub res()
Application.CommandBars('cell').Reset
End Sub

' AJOUTER UN CHOIX 'TOTO' A LA LISTE DU MENU CONTEXTUEL 'CELL'
Sub res2()
Application.CommandBars('cell').Controls.Add(msoControlButton).Caption = 'TOTO'
End Sub

Merci pour ton aide précieuse

A+
Philippe