Обращение к меню через CommandBars

Программирование на Visual Basic for Applications
Зелёный
Новичок
Новичок
 
Сообщения: 33
Зарегистрирован: 25.06.2003 (Ср) 15:52
Откуда: Russia

Обращение к меню через CommandBars

Сообщение Зелёный » 27.06.2003 (Пт) 12:23

А вот мне интересно. В зависимости от условия, я "заглушаю" пункты системного меню таким образом, например:
Application.CommandBars("Worksheet Menu Bar").Controls(2).Controls(10).Enabled = False

В контекстном меню (при клике правой кнопкой по ячейкам), если мне надо что-то сделать с пунктами этого меню, я делаю так:
Application.CommandBars("cell").Controls(5).Enabled = False

А каким образом мне обратится к контекстному меню, когда я кликаю правой мышкой по заголовку строки и выделяю строку полностью (например, Rows("189:189").Select - выделил полностью 189 строку) или когда кликаю правой кнопкой и выделяю весь столбец?
Что-то хелп в этом мне не очень помогает...
Заранее благодарен
[/i]

Vitaly1
Брехман
Брехман
 
Сообщения: 1578
Зарегистрирован: 30.12.2002 (Пн) 16:35
Откуда: Russia, Mosсow

Сообщение Vitaly1 » 27.06.2003 (Пт) 12:46

Стандартное контекстное меню обычно имеет имя связанное с тем, что выделенно, наверное :"Column", "Row" - для столбца и строки.
можно во так перебрать все названия:
Код: Выделить всё
for i=1 to Application.CommandBars.count
msgbox Application.CommandBars(i).name
next i

Зелёный
Новичок
Новичок
 
Сообщения: 33
Зарегистрирован: 25.06.2003 (Ср) 15:52
Откуда: Russia

Сообщение Зелёный » 27.06.2003 (Пт) 13:12

Cпасибо большое


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 25

    TopList