Задание для самостоятельной работы 8.1 Работа с панелями инструментов, меню и помощником

Задание:

Создайте и сделайте видимой в Word новую панель инструментов с двумя кнопками: "Показать помощника" и "Отключить помощника". Она может выглядеть, например, так, как представлено на рис.  8.5:

Рис. 8.5 Новая панели инструментов Word

При нажатии на кнопку "Показать помощника" должен появляться помощник, а при нажатии на кнопку "Отключить помощника" он должен отключаться.

Сделайте так, чтобы при нажатии на кнопку "Включить помощника" появлялось дополнительное меню, аналогичное представленному на рис. 8.6.

Рис. 8.6 Созданное программным образом новое меню

При выборе пункта меню "Показать выделенный текст" в окне помощника должен показываться текст, который выделен в документе (см. рис. 8.7)

Рис. 8.7 Вызванный макросом помощник в действии

Примечание:

Просмотреть номера всех встроенных панелей и меню в Office можно при помощи кода

Dim cBar As CommandBar

For Each cBar In CommandBars

Debug.Print cBar.Index & vbTab & cBar.Name

Next

Если вы хотите поместить новый элемент в стандартное меню Office, то номер стандартного меню в коллекции CommandBars — 41.

Получить учебные материалы по этому курсу