Discussion :

[Fvandermeulen]

Bonjour à tous,
J'ai un petit souci lié aux versions excel (langue) je travaille sous E03 en anglais et lorsque je veux bloquer le menu option j'utilise le code ci-dessous.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.CommandBars(1).Controls("Tools").Controls("Options...").Enabled = False

Le problème c'est que j'ai des collègues qui sont en version française, du coup ce code ne fonctionne pas.
Pour ne pas utiliser un gestionnaire d'erreur j'ai voulu le faire avec les numéros ID du controle, comme ci-dessous, mais dans ce cas j'ai un message d'erreur.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.CommandBars(1).Controls(30007).Controls(522).Enabled = False

Auriez vous une petite idée sur ce qui 'cloche' ?

D'avance merci,

[dadavyvy]

Bonjour,

essaie tout simplement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.CommandBars(1).FindControl(ID:=522, Recursive:=True).Enabled = False

[Fvandermeulen]

Alors là c'est frustrant ! c'est un code que j'ai déjà testé mais en moins simple, comme quoi...
Donc pour conclure, c'est OK.
Merci,