Suppression menu click droit excel

Résolu/Fermé
supermoun - 25 févr. 2008 à 19:19
gfortin9 Messages postés 1 Date d'inscription vendredi 3 septembre 2010 Statut Membre Dernière intervention 3 septembre 2010 - 3 sept. 2010 à 03:24
Bonjour à tous,

Est.il possible à l'ouverture d'un classeur Excel de supprimer le menu
du click droit de la souris dans une ou des feuilles.

Merci pour la réponse
A voir également:

3 réponses

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
25 févr. 2008 à 21:18
bonjour

supprimer le menu du click droit de la souris dans une ou des feuilles.

Pour le supprimer sur toutes les feuilles, tu mets ceci dans thisworkbook
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
Cancel = True
End Sub

Pour le supprimer sur une feuille, tu mets ceci dans chaque feuille concernée
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
End Sub
2
supermoun Messages postés 38 Date d'inscription dimanche 10 septembre 2006 Statut Membre Dernière intervention 26 juillet 2009 7
4 mars 2008 à 11:07
Bonjour GBinforme,

Excuse pour le retard.

J'ai fait l'essai dans la feuille, c'est ok.
pour le workbook,ça ne marche pas.
A+
0
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
4 mars 2008 à 14:23
bonjour

pour le workbook,ça ne marche pas.

Tu me surprends beaucoup et vérifies que tu as bien Workbook_SheetBeforeRightClick( dans la feuille VBA de thisworkbook
0
supermoun Messages postés 38 Date d'inscription dimanche 10 septembre 2006 Statut Membre Dernière intervention 26 juillet 2009 7
9 mars 2008 à 10:39
Bonjour GBinforme,

C'est bon pour le classeur.

A+
0
gfortin9 Messages postés 1 Date d'inscription vendredi 3 septembre 2010 Statut Membre Dernière intervention 3 septembre 2010
Modifié par gfortin9 le 3/09/2010 à 03:26
Allô!

Désolé, erreur d'interprétation 8- /

Tourlou...
0