Как с помощью Vb симитировать нажание кнопки панели инструментов?

[Sem_Simol 0]

Как с помощью VB симитировать нажание кнопки панели инструментов?

Кнопка своя, запускает внешний макрос. Сделана кнопка через Инструменты- Настройка - Команды - Макрос - Настраиваемая кнопка макроса

[ssv22 17]

Нужно именно имитировать? Что-бы кнопка нажималась-отжималась?

Или просто запустить макрос?

Если просто запустить макрос, то первое что приходит на ум это назначить данной кнопке горячую клавишу и с помощью оператора VB "SendKeys" послать это сочетание в окно SW. Окно SW в этот момент должно быть активным!

Пример:

...

'активизация SW:

'AppActivate "SolidWorks Office Premium 2006" 'для SW2006

'AppActivate "SolidWorks " 'для SW2003-2005

'SendKeys "(d)", True 'посылаем команду в SW-клавише назначена гор.кл. "d"

...

2 вариант: почему-бы код этого макроса не включить в код "главной" программы?