Основы офисного программирования и язык VBA
Переименование команды меню
VBA позволяет динамически переименовывать команды меню, используя свойство Caption (Заголовок) изменяемой команды. Это может пригодиться, например, при настройке меню на язык пользователя. В следующем примере в англоязычной версии Office 2000 имя команды "Open Database" переводится на русский язык.
CommandBars("MyMenubar").Controls("File").Controls("Open Database") _ .Caption = "Открыть базу данных"
Другой способ - завести переменную, ссылающуюся на данную команду:
Set openData = CommandBars("My Menubar").Controls _ ("File").Controls("Open Database")
и затем использовать ее в программе для доступа к команде. При этом изменить заголовок можно так:
openData.Caption = "Открыть базу данных"
