cs_carvals
Messages postés50Date d'inscriptionlundi 20 novembre 2000StatutMembreDernière intervention23 janvier 2008
-
30 août 2006 à 19:07
cs_carvals
Messages postés50Date d'inscriptionlundi 20 novembre 2000StatutMembreDernière intervention23 janvier 2008
-
7 sept. 2006 à 18:12
Bonjour,
J'ai fait une macro qui interdit le click-droit et qui supprime les barres d'outils afin d'obliger le user a rester sur la feuille. Mais petit probleme quand je retabli la config les barres d'outils reviennent mais pas le click droit.
POur le click droit j'avais utiliser:
Private Sub Chart_BeforeRightClick(Cancel As Boolean)
Cancel = True
End Sub
Et la blague c'est que c'est devenu la config par defaut de Excel.... c'est genant sans click-droit.... donc si quelqu'un sait comment retablir la config je suis preneur!!!
qqes pecisions;
le click droit ne fonctionnent pas sur les cellules mais sur les barres d'outils c'est OK
Sur la barre d'outils/click droit/ customize/ = plus aucune barre dispo. Oblige de les rappeler par macro genre:
Application.CommandBars("Chart Menu Bar").Enabled = True
Application.CommandBars("Worksheet Menu Bar").Enabled = True
Application.CommandBars("Standar").Enabled = True
etc...
cs_carvals
Messages postés50Date d'inscriptionlundi 20 novembre 2000StatutMembreDernière intervention23 janvier 2008 6 sept. 2006 à 15:43
en passant.
bon voila nouvelle solution. L'idee de Mpi de faire click droit puis retaurer les barres m'a fait cogite... seul probleme de cette methode le menu de la souris (click-droit) n'est pas impacte alors... quid
bah il suffit de faire la meme chose mais en VBA:
Application.CommandBars("Cell").Reset
et oui il fallait savoir que le menu de la souris s'appelle "cell" enfin ds la version anglaise. Je sais pas si ca vient de moi mais je trouve pas cela hyper logique et j'ai trouve cette solution par hasard!
Maintenant sachant cela on facilement customiser le menu de cette souris!
cs_carvals
Messages postés50Date d'inscriptionlundi 20 novembre 2000StatutMembreDernière intervention23 janvier 2008 31 août 2006 à 08:54
salut,
justement je comprends pas c'est un programme independant.
j'utilise en effet application.commandbars.("worksheet menu bar").enabled = true pour retablir la config mais ca n'a pas d'effet sur le click-droit puique la commande pour couper cette fonctionalite etait
cancel true et en essayant cancel false pas plus de resultats..... quid?
cs_MPi
Messages postés3877Date d'inscriptionmardi 19 mars 2002StatutMembreDernière intervention17 août 201823 31 août 2006 à 11:19
Oups, je n'avais pas vu que tu l'avais mentionnée...
Une fois le mal fait...la commande Cancel ne devrait plus être d'aucune utilité, en principe.
Chose certaine, tu devrais oublier le Cancel = True sauf peut-être en y mettant une condition précise, mais là je patauge...
À quel endroit de ton programme utilises-tu ces commandes
Application.CommandBars("....").Enabled = True
As-tu essayé dans la même procédure ?
As-tu aussi essayé dans ThisWorkbook avant de fermer ?
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Finalement, as-tu essayé en cliquant droit sur la barre des menus, puis
Personnaliser (Customize) et dans l'onglet Option, cliquer sur le
bouton Réinitialiser les menus (je ne sais pas sur la version
anglaise...)
cs_carvals
Messages postés50Date d'inscriptionlundi 20 novembre 2000StatutMembreDernière intervention23 janvier 2008 7 sept. 2006 à 18:12
en revenant.
Est ce que quelqu'un sait ou est ce que l'on peut trouver la liste des noms des menus?? genre:
"Cell"
"Pivot table"
etc...
je suis particulierement interesser par les differents menus du click droit souris sur les graphiques.
Merci d'avance.... MPi je ne te sens pas particulierement viser par cette question mais bon un peu qd meme ; ) (d'autant plus que l'on est les deux seuls a avoir poste sur cette question dc les deux seuls a avoir une alerte mail....)
carvals
PS: je ne voulais pas creer un autre question juste histoire que l'on fasse le tour de la question click droit en une seule fois. Plus facile a comprendre je pense.