Ajout dans le menu contextuel des feuilles

quelque chose comme ça devrait le faire.je pense que tu cherche à mettre ton controle dans le menu contextuel qui s'affiche quand on clique droit sur un onglet. ce menu s'appelle "Ply". Si c'est pas ce que tu veux faire, donne plus de détails pour savoir de quel menu contextuel tu parles

Sub Macro1(

Set NewItem = Application.CommandBars("Ply").Controls.Ad

With NewIte
.Caption = "toto
.OnAction = "le nom de ce que tu veux exécuter
.FaceId =
End Wit

End Su

'pour éliminer ton control

Sub macro2(
Application.CommandBars("Ply").Controls("toto").Delet
End Su

bonjour,
moi, j'ai plutôt compris qu'albator voulait son sntrôle sous le clic
droit dans une cellule, auquel cas il lui suffit de remplacer "Ply" par
"Cell"...
mais j'a pu ptêt ben m'gouré...
jps

anonymous@fr a écrit:

quelque chose comme ça devrait le faire.je pense que tu cherche à mettre ton controle dans le menu contextuel qui s'affiche quand on clique droit sur un onglet. ce menu s'appelle "Ply". Si c'est pas ce que tu veux faire, donne plus de détails pour savoir de quel menu contextuel tu parles.

Sub Macro1()

Set NewItem = Application.CommandBars("Ply").Controls.Add

With NewItem
.Caption = "toto"
.OnAction = "le nom de ce que tu veux exécuter"
.FaceId = 0
End With

End Sub

'pour éliminer ton controle

Sub macro2()
Application.CommandBars("Ply").Controls("toto").Delete
End Sub