EMPECHER CLICK DROIT COMMANDBAR EXCEL
SR2
Messages postés
46
Date d'inscription
samedi 17 juillet 2004
Statut
Membre
Dernière intervention
25 juillet 2006
-
9 mars 2005 à 22:39
SR2 Messages postés 46 Date d'inscription samedi 17 juillet 2004 Statut Membre Dernière intervention 25 juillet 2006 - 26 mars 2005 à 20:53
SR2 Messages postés 46 Date d'inscription samedi 17 juillet 2004 Statut Membre Dernière intervention 25 juillet 2006 - 26 mars 2005 à 20:53
A voir également:
- Clic droit excel ne fonctionne plus
- Arctan excel ✓ - Forum C++ & C++ .NET
- Arctangente excel - Forum Visual Basic
- Excel vba modulo - Forum Visual Basic
- Tan-1 excel - Forum C++ & C++ .NET
- Inverse Sinus, Cos, et Tangent ✓ - Forum Visual Basic 6
3 réponses
SR2
Messages postés
46
Date d'inscription
samedi 17 juillet 2004
Statut
Membre
Dernière intervention
25 juillet 2006
1
26 mars 2005 à 20:53
26 mars 2005 à 20:53
CA YEST G TROUVE !!!!
Voici le code pour supprimer le menu contextuel "Personnalisé" lorsque l'on clique droit sur une barre de commande excel (plus bête que ca tu meurs....ah je décède...):
CommandBars("Toolbar List").Enabled = False
Voici le code pour supprimer le menu contextuel "Personnalisé" lorsque l'on clique droit sur une barre de commande excel (plus bête que ca tu meurs....ah je décède...):
CommandBars("Toolbar List").Enabled = False
jpleroisse
Messages postés
1788
Date d'inscription
mardi 7 novembre 2000
Statut
Membre
Dernière intervention
11 mars 2006
27
10 mars 2005 à 00:09
10 mars 2005 à 00:09
Bonsoir,
Je ne connais pas de code pour désactiver le menu contextuel d'une barre de commande, par contre on peux désactiver celui de toutes les cellules de la feuille. au cas où cela pourraît te servir.
Sub DisableShorcutMenus()
Dim cb As CommandBar
For Each cb In CommandBars
If cb.Type = msoBarTypePopup Then
cb.Enabled = False
End If
Next cb
End Sub
Si l'on veut empécher l'utilisateur d'ouvrir un menu, par exemple ici le menu fenêtre le code est le suivant.
Sub désactiver()
CommandBars(1).Controls("Fenêtre").Enabled = False
End Sub
Pour rétablir , remettre à True
jpleroisse
Je ne connais pas de code pour désactiver le menu contextuel d'une barre de commande, par contre on peux désactiver celui de toutes les cellules de la feuille. au cas où cela pourraît te servir.
Sub DisableShorcutMenus()
Dim cb As CommandBar
For Each cb In CommandBars
If cb.Type = msoBarTypePopup Then
cb.Enabled = False
End If
Next cb
End Sub
Si l'on veut empécher l'utilisateur d'ouvrir un menu, par exemple ici le menu fenêtre le code est le suivant.
Sub désactiver()
CommandBars(1).Controls("Fenêtre").Enabled = False
End Sub
Pour rétablir , remettre à True
jpleroisse
SR2
Messages postés
46
Date d'inscription
samedi 17 juillet 2004
Statut
Membre
Dernière intervention
25 juillet 2006
1
10 mars 2005 à 20:48
10 mars 2005 à 20:48
Merci pour ta réponse
j'avais jamais pensé a faire ca
en fait g utilisé le bout de code que tu m'as donné et ca désactive l'affichage de tous les menus lorsque l'on clicke droit
il ne reste plus que "Volets office" et "personnalisé" d'affichés dans le menu contextuel
si tu as une idée pour les effacer je suis preneur
j'avais jamais pensé a faire ca
en fait g utilisé le bout de code que tu m'as donné et ca désactive l'affichage de tous les menus lorsque l'on clicke droit
il ne reste plus que "Volets office" et "personnalisé" d'affichés dans le menu contextuel
si tu as une idée pour les effacer je suis preneur
