ReSQL.ru
     
powered by simpleCommunicator - 2.0.36     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / назначить горячую клавишу кнопке на панели инструментов
6 сообщений из 6, страница 1 из 1
назначить горячую клавишу кнопке на панели инструментов
    #32073267
xyz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
xyz
Гость
как назначить горячую клавишу кнопке на панели инструментов в Word?
...
Рейтинг: 0 / 0
28.11.2002, 10:42
| Ответить | Цитировать | Написать  
назначить горячую клавишу кнопке на панели инструментов
    #32073273
Фотография NNN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NNN
Участник
Код: plaintext
1.
2.
3.
4.
Sub Макрос1()
    CustomizationContext = NormalTemplate
    KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyF12, wdKeyControl, wdKeyAlt), _
        KeyCategory:=wdKeyCategoryCommand, Command:= "FileCloseAll" 
End Sub


Вид -> Панели инструментов -> Настройка -> Команды -> Клавиатура
...
Рейтинг: 0 / 0
28.11.2002, 10:57
| Ответить | Цитировать | Написать  
назначить горячую клавишу кнопке на панели инструментов
    #32073310
xyz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
xyz
Гость
а как добавить свою команду в список доступных команд? я создал свою панель инструментов и хочу кнопке на моей панели задать горячую клавишу.
...
Рейтинг: 0 / 0
28.11.2002, 11:49
| Ответить | Цитировать | Написать  
назначить горячую клавишу кнопке на панели инструментов
    #32073345
Фотография NNN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NNN
Участник
Вид -> Панели инструментов -> Настройка -> Команды -> Клавиатура -> Категории -> Макросы -> YourMacroName
...
Рейтинг: 0 / 0
28.11.2002, 12:55
| Ответить | Цитировать | Написать  
назначить горячую клавишу кнопке на панели инструментов
    #32073356
xyz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
xyz
Гость
NNN, во первых . спасибо больше за помощь (дело очень срочное). а во вторых - нельзя ли как нибудь назначить программно какой конкретно маакрос будет вызыватся при нажатии на клавишу. если я сделаю Вид -> Панели инструментов -> Настройка -> Команды -> Клавиатура -> Категории -> Макросы -> YourMacroName получается следующий код:
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyF9), _ KeyCategory:= wdKeyCategoryMacro, Command:=""
непонятно где задается имя макроса (YourMacroName не присутствует в коде) а при попытке выполнить код выдает ошибку "неверный параметр". хотя макрос назначеный вручную нормально вызывается нажатием клавиши.
...
Рейтинг: 0 / 0
28.11.2002, 13:14
| Ответить | Цитировать | Написать  
назначить горячую клавишу кнопке на панели инструментов
    #32073397
Фотография NNN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NNN
Участник
> спасибо больше за помощь

не за что, мы тоже в вордах ламеры..

Кажется получилось через Command:="[Шаблон].[Модуль].[Макрос]"

Код: plaintext
1.
2.
3.
4.
5.
Sub Macro1()
    CustomizationContext = NormalTemplate
    KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyL, wdKeyControl, wdKeyShift, _
        wdKeyAlt), KeyCategory:=wdKeyCategoryMacro, Command:= "Normal.NewMacros.MyFindLingvo" 
End Sub
...
Рейтинг: 0 / 0
28.11.2002, 14:15
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / назначить горячую клавишу кнопке на панели инструментов
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=32073273&tid=2171551]:
 0ms
get settings:
 12ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 29ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 48ms
get tp. blocked users:
 1ms
others: 264ms
total:  391ms
созд. / загр.: 391ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]