Apibrėžkite klavišų kombinacijas „Excel“ ir priskirkite funkcijas
Šiame pavyzdyje klavišų kombinacija Ctrl + ü skaičiuotuvą galima iškviesti iš „Windows“ priedų.
Norėdami nustatyti sparčiuosius klavišus, atlikite šiuos veiksmus:
Papildomos klaviatūros nuorodų sąranka ()
Application.OnKey "ü", "CallCalculator"
Pabaiga Sub
Išsaugota makrokomanda atrodo taip:
Sub callCalculator ()
Dim x kaip variantas
x = apvalkalas ("calc.exe")
Pabaiga Sub
Jei klavišų kombinacija nebenaudojama, pradėkite šią procedūrą:
Papildomas klavišų derinys Atšaukti ()
Application.OnKey "ü"
Pabaiga Sub
Pastaba:
Dažnai spartieji klavišai nustatomi atidarant tam tikrą darbaknygę. Norėdami tai padaryti, kūrimo aplinkoje dukart spustelėkite įrašą Ši darbo knyga projekto naršyklėje ir išsaugokite šį įvykį:
Privati antrinė darbo knyga_Atidaryti ()
Sąrankos spartusis klavišas
Pabaiga Sub
„Workbook_Open“ įvykis automatiškai vykdomas (jei jis nustatytas), kai atidaroma darbaknygė. Mūsų atveju čia vadinama klavišų derinio sąrankos procedūra.
Tai naudinga, jei uždarę šį aplanką ištrinate anksčiau nustatytą klavišų derinį. „Workbook_BeforeClose“ įvykis automatiškai vykdomas uždarius aplanką. Tokiu atveju procedūros atrakinimo raktas vadinamas:
Privati antrinė darbo knyga_BeforeClose (Atšaukti kaip loginis)
Klavišų kombinacija Atšaukti
Pabaiga Sub
Tai reiškia, kad „Excel“ visada galite valdyti sparčiuosius klavišus.