Määrake Excelis klahvikombinatsioonid ja määrake funktsioonid
Järgmises näites klahvikombinatsioon Ctrl + ü kalkulaatorit saab helistada Windowsi lisaseadmetest.
Klaviatuuri otsetee määramiseks tehke järgmist.
Alamklaviatuuri otsetee seadistamine ()
Application.OnKey "ü", "CallCalculator"
End Sub
Salvestatud makro näeb välja selline:
AlamkõneKalkulaator ()
Dim x kui variant
x = kest ("calc.exe")
End Sub
Kui klahvikombinatsiooni enam ei kasutata, alustage järgmist protseduuri:
Alamklahvide kombinatsioon Tühista ()
Application.OnKey "ü"
End Sub
Märge:
Sageli tehakse klaviatuuri otseteede seadistamine konkreetse töövihiku avamisel. Selleks topeltklõpsake projektikeskuses arenduskeskkonnas kirjet See töövihik ja salvestage järgmine sündmus:
Privaatne alamtöövihik_Avatud ()
Seadistamise otsetee
End Sub
Sündmus Workbook_Open käivitatakse automaatselt (kui see on määratud), kui töövihik avatakse. Meie puhul kutsutakse siin protseduuri Klahvikombinatsiooni häälestus.
See on kasulik, kui kustutate selle kausta sulgemisel eelnevalt seadistatud klahvikombinatsiooni. Sündmus Workbook_BeforeClose käivitatakse automaatselt kausta sulgemisel. Sel juhul nimetatakse protseduuri avamise klahvi:
Privaatne alamtöövihik_BeforeClose (Tühista kui Boolean)
Klahvikombinatsioon Tühista
End Sub
See tähendab, et teil on Excelis alati kiirklahvid kontrolli all.