(495) 925-0049, ITShop интернет-магазин 229-0436, Учебный Центр 925-0049
  Главная страница Карта сайта Контакты
Поиск
Вход
Регистрация
Рассылки сайта
 
 
 
 
 

Создание кнопки-ссылки на сайт в главном меню редактора

Необходимо в главном меню редактора Word поместить дополнительную кнопку, при нажатии которой откроется во внешнем браузере определенная интернет-страница.

Примерный код:

Sub menuButtonWeb ()
Dim HyperButton As CommandBarButton
Set HyperButton = CommandBars("Menu Bar").Controls.Add(ID:=1576) 'ID - это номер идентификатора иконки
    HyperButton.HyperlinkType = msoCommandBarButtonHyperlinkOpen
    HyperButton.TooltipText = "http://wordexpert.ru/"
End Sub

Чтобы получить список идентификаторов иконок и их соответствий командам, пунктам меню и панелей, следует выполнить следующий макрос:

Sub viewID()
'Макрос отображения идентификаторов панелей инструментов, команд и пунктов меню
Dim comBar As CommandBar
Dim comBarControl As CommandBarControl
Dim i As Integer
For Each comBar In CommandBars
   For Each comBarControl In comBar.Controls
      With Selection
         .TypeText comBarControl.Caption & " - " & comBarControl.ID & " - " & _
         comBar.Name & vbCrLf
      End With
   Next
Next
End Sub

Ссылки по теме


 Распечатать »
 Правила публикации »
  Написать редактору 
 Рекомендовать » Дата публикации: 19.12.2007 
 

Магазин программного обеспечения   WWW.ITSHOP.RU
Microsoft 365 Business Standard (corporate)
Microsoft Office 365 Бизнес. Подписка на 1 рабочее место на 1 год
Microsoft 365 Business Basic (corporate)
Microsoft Windows Professional 10, Электронный ключ
Microsoft 365 Apps for business (corporate)
 
Другие предложения...
 
Курсы обучения   WWW.ITSHOP.RU
 
Другие предложения...
 
Магазин сертификационных экзаменов   WWW.ITSHOP.RU
 
Другие предложения...
 
3D Принтеры | 3D Печать   WWW.ITSHOP.RU
 
Другие предложения...
 
Новости по теме
 
Рассылки Subscribe.ru
Информационные технологии: CASE, RAD, ERP, OLAP
Безопасность компьютерных сетей и защита информации
Новости ITShop.ru - ПО, книги, документация, курсы обучения
Программирование на Microsoft Access
CASE-технологии
eManual - электронные книги и техническая документация
Corel DRAW - от идеи до реализации
 
Статьи по теме
 
Новинки каталога Download
 
Исходники
 
Документация
 
 



    
rambler's top100 Rambler's Top100