Excel VBA: назначение сочетания клавиш для запуска процедуры

Ответ 1

Чтобы назначить клавиатуру на кнопку на листе, вы можете использовать этот код, просто скопируйте этот код на лист, содержащий кнопку.
Здесь Return указывает ключ, а get_detail - это имя процедуры.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Application.OnKey "{RETURN}", "get_detail"

End Sub

теперь из листа всякий раз, когда u нажимает кнопку ввода, назначается макрос.

Ответ 2

Согласно Документация Microsoft

• В меню "Сервис" выберите "Макро" и нажмите "Макросы".
• В поле "Имя макроса" введите имя макроса, который вы хотите назначить клавише быстрого доступа.
• Нажмите "Параметры".

• Если вы хотите запустить макрос, нажав комбинацию клавиш, введите букву в поле быстрого доступа. Вы можете использовать CTRL + letter (для строчных букв) или CTRL + SHIFT + letter (для прописных букв), где буква - буква буква на клавиатуре. Клавиша быстрого доступа не может использовать число или специальный символ, например @или #.

  Примечание. Клавиша быстрого доступа отменяет любые эквивалентные стандартные сочетания клавиш Microsoft Excel, когда рабочая книга, содержащая макрос, открыта.

• Если вы хотите включить описание макроса, введите его в поле "Описание".

• Нажмите "ОК".
• Нажмите "Отмена".

Ответ 3

F5 - это стандартный ярлык для запуска макроса в редакторе VBA. Я не думаю, что вы можете добавить ярлык в самом редакторе. Если вы хотите запустить макрос из excel, вы можете назначить ярлык оттуда.

В excel нажмите alt + F8, чтобы открыть диалоговое окно макроса. выберите макрос, для которого вы хотите назначить комбинацию клавиш и щелкните параметры. там вы можете назначить ярлык макросу.

Ответ 4

Вот как назначить сочетание клавиш для пользовательского макроса в Word 2013. В сценарии вы создали макрос с именем "fred", и вы хотите выполнить макрос, набрав Ctrl + f.

• Нажмите "Файл", "Параметры".
• Нажмите "Настроить ленту" (с моей точки зрения это неинтуитивный шаг).
• Нажмите кнопку "Клавиши быстрого доступа: настройка".
• В списке категорий прокрутите вниз до бутмата и выберите Макросы.
• В окне списка Макросов теперь должен отображаться список настраиваемых макросов. Выберите "fred".
• Нажмите "Создать новую комбинацию клавиш", чтобы активировать ее.
• Введите Ctrl + f. Это должно появиться в текстовом поле.
• Посмотрите на список "Текущие ключи". В этом случае отображается "В настоящее время назначено NavPaneSearch".
• Если вы не против переопределять это значение по умолчанию, нажмите кнопку "Назначить" в левом нижнем углу, чтобы назначить "Ctrl + f: запустить ваш макрос" fred ".

По умолчанию присваивание сохраняется в шаблоне документа Normal.dotm. Если это назначение клавиатуры уникально для этого документа, возможно, вы захотите изменить раскрывающийся список "Сохранить изменения" в названии документа.

Ответ 5

Функциональные клавиши F (F1, F2, F3, F4, F5 и т.д.) могут быть назначены макросам со следующими кодами:

Sub A_1()
    Call sndPlaySound32(ThisWorkbook.Path & "\a1.wav", 0)
End Sub
Sub B_1()
Call sndPlaySound32(ThisWorkbook.Path & "\b1.wav", 0)
End Sub
Sub C_1()
Call sndPlaySound32(ThisWorkbook.Path & "\c1.wav", 0)
End Sub
Sub D_1()
Call sndPlaySound32(ThisWorkbook.Path & "\d1.wav", 0)
End Sub
Sub E_1()
Call sndPlaySound32(ThisWorkbook.Path & "\e1.wav", 0)
End Sub

Sub auto_open()
Application.OnKey "{F1}", "A_1"
Application.OnKey "{F2}", "B_1"
Application.OnKey "{F3}", "C_1"
Application.OnKey "{F4}", "D_1"
Application.OnKey "{F5}", "E_1"
End Sub

Ответ 6

Я столкнулся с этой проблемой сам. Единственное решение, которое у меня есть, - сначала записать макрос в книге Excel. Затем перетащите МОДУЛЬ из открытой книги в модули надстройки. Это будет копия вышеуказанного модуля, но ярлык клавиатуры, который вы ему назначили, к счастью сохранится.

Я просто записываю мусорный макрос и перемещаю его туда, а затем копирую код из моего реального модуля послесловия.

Чувствовал себя так здорово, чтобы понять это, мне показалось, что я должен был ответить на 5-летние должности, которые я нашел по этому вопросу!!!

Ответ 7

Проблема, с которой я столкнулась, заключается в том, что я хотел связать короткий ключ с макросом в xlam, который не имеет видимого интерфейса. Я обнаружил, что последующие работы

Чтобы связать короткий текст с макросом

В Excel (не VBA) на вкладке "Разработчик" щелкните Макросы - макросы не будут отображаться Введите имя Sub Затем следует включить кнопку "Параметры" Нажмите Ctrl будет по умолчанию Удерживая Shift и нажмите нужную букву например, Shift и A будет ассоциировать Ctrl-Shift-A с Sub