Страницы: 1
RSS
Получить список всех CommandBarControl
 
Доброго всем времени суток!  
Что-то не могу я понять как получить все контролы менюшки.  
Код "For j = 1 To MyMenu.Controls.Count..." выдает только контролы "первого" уровня. т.е. если среди них есть контрол типа msoControlPopup (раскрывающаяся вправо/влево менюшка) со своими контролами, то они в список не попадут. Я с рекурсией не особо в ладах. Неужели без нее никак не получится?    
________________________  
khafizovtt@gmail.com
Учимся сами и помогаем другим...
 
не получится
Чебурашка стал символом олимпийских игр. А чего достиг ты?
Тишина - самый громкий звук


https://github.com/nervgh
 
Вопрос - а зачем перебирать менюшки в цикле?  
Легко найти и обратиться к нужному пункту меню, используя метод  
application.CommandBars.FindControl(ID:=1).Execute    
 
(где вместо 1 надо поставить ID нужного вам элемента меню)
 
FindControl это же функция, которая ищет CommandBarControl по указанным критериям. Экспериментировал с ней и походу CommandBarControl ищется тоже на одном уровне. т.е. вложенные CommandBarControl уже не ищутся :-(  
________________________  
khafizovtt@gmail.com
Учимся сами и помогаем другим...
 
Так?
 
Да, anvg, именно оно самое. Спасибо большое! Буду изучать рекурсию :-)  
________________________  
khafizovtt@gmail.com
Учимся сами и помогаем другим...
 
http://www.excelworld.ru/forum/2-1891-1#20837
Чебурашка стал символом олимпийских игр. А чего достиг ты?
Тишина - самый громкий звук


https://github.com/nervgh
Страницы: 1
Читают тему
Наверх