powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Задание горячих клавиш програмно в VBA
4 сообщений из 4, страница 1 из 1
Задание горячих клавиш програмно в VBA
    #35338459
RA82
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день, есть небольшой макрос, который работает как "специальная вставка"- "значения"

Sub SpecialPaste()
Selection.PasteSpecial Paste:=xlPasteValues

End Sub

Подскажите, плиз, как можно здесь прописать запуск этого макроса с помощью горячих клавишь (например, "Ctrl-q"). Знаю, это можно выставить в параметрах макроса. Но такой вариант не подходит
...
Рейтинг: 0 / 0
Задание горячих клавиш програмно в VBA
    #35338510
Дык
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Код: plaintext
application.onkey "^p", "SpecialPaste"
...
Рейтинг: 0 / 0
Задание горячих клавиш програмно в VBA
    #35338632
Фотография ДмиДми
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну, вот ещё. "От щедрот, значит" (с)

Сервис -- Настройка -- вкладка Команды левое окошко Категории: Правка правое окошко Команды: Вставить значения

Тащить эту кнопочку на любую панель, лишь бы перед дропом был плюсик возле маркера.

Но это всё совершенно неинтересно. Интересно, с какого перепугу
"Знаю, это можно выставить в параметрах макроса. Но такой вариант не подходит"
?
...
Рейтинг: 0 / 0
Задание горячих клавиш програмно в VBA
    #35339389
RA82
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Нарисовал так:

Sub SpecialPaste()
Application.OnKey "^q", "SpecialPaste"
Selection.PasteSpecial Paste:=xlPasteValues
End Sub

не работает, не видит макрос "C:\Document and Settings\...Книга1.xls'!SpecialPaste'.
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Задание горячих клавиш програмно в VBA
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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