Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Вопрос-Ответ Новый топик    Ответить
 [Word] Своё меню  [new]
sql student
Guest
Как с помощью Vb создать word документ в котором было бы своё меню. Например чтобы добавлялся новый пункт меню в контекстное меню или на панель инструментов.

что посоветуете почитать на эту тему, как это можно организовать.
7 авг 04, 01:46    [866343]     Ответить | Цитировать Сообщить модератору
 Re: [Word] Своё меню  [new]
Stepler
Member

Откуда: Северная столица!? (Питер)
Сообщений: 1435
Типа:
Sub Макрос1()
Set NewMnu = Application.CommandBars("File").Controls("Мой пункт меню в меню 'Файл'")
With NewMnu
.TooltipText = "55555555555"
.OnAction = "Копировать"
.Visible = True
End With
End Sub
Sub Изменение функции кнопки на панели инструментов()
Set CntProp = Application.CommandBars(3).Controls("&Копировать")
With CntProp
.TooltipText = "55555555555"
.OnAction = "Откр_ОКНО"
.Visible = True
End With
End Sub

Stepler (щёлк-щёлк!!) Картинка с другого сайта.
9 авг 04, 08:47    [867532]     Ответить | Цитировать Сообщить модератору
Все форумы / Вопрос-Ответ Ответить