Определете комбинации от клавиши в 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 се изпълнява автоматично, когато папката се затвори. В този случай процедурата Unlock key се нарича:
Private Sub Workbook_BeforeClose (Отказ като булев)
Комбинация от клавиши Отказ
End Sub
Това означава, че винаги имате контролирани клавишни комбинации в Excel.