Sujet Précédent Sujet Suivant

Workbook_SheetBeforeRightClick

vekmort Messages postés 4 Date d'inscription lundi 4 octobre 2010 Statut Membre Dernière intervention 22 novembre 2014 - 29 mars 2011 à 12:35
vekmort Messages postés 4 Date d'inscription lundi 4 octobre 2010 Statut Membre Dernière intervention 22 novembre 2014 - 29 mars 2011 à 12:44
Bonjour,
Je voudrais dans Excel ajouter un élément au menu clic droit.
En général, j'ajoute une macro événementielle au niveau feuille, mais là je voudrais faire la même chose au niveau classeur. Et la même macro ne fonctionne pas.
"Erreur exécution '91'".
Voici le code :

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
Application.CommandBars("Cell").Reset
Set NBt = CommandBars("Cell").Controls.Add(Type:=msoControlButton)
With NBt
.Caption = "Mise à jour données période"
.OnAction = "RecupMttParCompte.RecupMtt"
End With
End Sub

La macro bugue sur la ligne "Set NBt..." alors que sur une feuille cela fonctionne...

Merci d'avance pour votre aide.

1 réponse

Réponse 1 / 1
vekmort Messages postés 4 Date d'inscription lundi 4 octobre 2010 Statut Membre Dernière intervention 22 novembre 2014
29 mars 2011 à 12:44
Re-bonjour à moi tout seul, je viens de trouver.
Au niveau feuille, ça fonctionne, par contre au niveau classeur, il faut indiquer à nouveau "application" avant commandbars...
Ce qui donne :
Set NBt = Application.CommandBars("Cell").Controls.Add(Type:=msoControlButton)

Désolé pour le dérangement
0
Rejoignez-nous