Definiți combinații de taste în Excel și atribuiți funcții
În exemplul următor, combinația de taste Ctrl + ü calculatorul poate fi apelat din accesoriile Windows.
Utilizați următoarea procedură pentru a seta comanda rapidă de la tastatură:
Configurare comandă rapidă sub tastatură ()
Application.OnKey "ü", "CallCalculator"
Sfârșitul Sub
Macrocomanda stocată arată astfel:
Sub callCalculator ()
Dim x ca variantă
x = shell („calc.exe”)
Sfârșitul Sub
Dacă combinația de taste nu mai trebuie folosită, porniți următoarea procedură:
Combinație de taste secundare Anulează ()
Application.OnKey "ü"
Sfârșitul Sub
Notă:
Adesea, configurarea comenzilor rapide de la tastatură se face la deschiderea unui anumit registru de lucru. Pentru aceasta, faceți dublu clic pe intrarea Acest registru de lucru în exploratorul de proiecte din mediul de dezvoltare și salvați următorul eveniment:
Private Sub Workbook_Open ()
Comandă rapidă de configurare
Sfârșitul Sub
Evenimentul Workbook_Open este executat automat (dacă este setat) la deschiderea registrului de lucru. În cazul nostru, procedura de configurare a combinației de taste este numită aici.
Acest lucru este util dacă ștergeți combinația de taste configurată anterior când închideți acest folder. Evenimentul Workbook_BeforeClose este executat automat la închiderea folderului. În acest caz, procedura cheie Deblocare se numește:
Private Sub Workbook_BeforeClose (Anulați ca boolean)
Combinație de taste Anulați
Sfârșitul Sub
Aceasta înseamnă că aveți întotdeauna comenzile rapide de la tastatură sub control în Excel.