Визначте комбінації клавіш в Excel і призначте функції
У наступному прикладі комбінація клавіш Ctrl + ü калькулятор можна викликати з аксесуарів Windows.
Скористайтеся такою процедурою, щоб встановити комбінацію клавіш:
Налаштування сполучення клавіш на клавіатурі ()
Application.OnKey "ü", "CallCalculator"
End Sub
Збережений макрос виглядає так:
Sub callCalculator ()
Dim x як варіант
x = оболонка ("calc.exe")
End Sub
Якщо комбінація клавіш більше не використовується, почніть таку процедуру:
Комбінація додаткових клавіш Скасувати ()
Application.OnKey "ü"
End Sub
Примітка:
Часто налаштування комбінацій клавіш здійснюється під час відкриття певної книги. Для цього двічі клацніть запис «Ця книга» у провіднику проектів у середовищі розробки та збережіть таку подію:
Private Sub Workbook_Open ()
Ярлик налаштування
End Sub
Подія Workbook_Open автоматично виконується (якщо вона встановлена) при відкритті книги. У нашому випадку тут викликається процедура Налаштування комбінації клавіш.
Це корисно, якщо ви закриєте раніше створену комбінацію клавіш, коли закриваєте цю папку. Подія Workbook_BeforeClose автоматично виконується при закритті папки. У цьому випадку процедура розблокування ключа називається:
Private Sub Workbook_BeforeClose (Скасувати як логічне значення)
Комбінація клавіш Скасувати
End Sub
Це означає, що у вас завжди під контролем комбінації клавіш в Excel.