Définir des combinaisons de touches dans Excel et attribuer des fonctions
Dans l'exemple suivant, la combinaison de touches Ctrl + ü la calculatrice peut être appelée à partir des accessoires Windows.
Utilisez la procédure suivante pour définir le raccourci clavier :
Configuration du raccourci clavier secondaire ()
Application.OnKey "ü", "CallCalculator"
Fin du sous-marin
La macro stockée ressemble à ceci :
Sous-appelCalculatrice ()
Dim x comme variante
x = shell ("calc.exe")
Fin du sous-marin
Si la combinaison de touches ne doit plus être utilisée, lancez la procédure suivante :
Sous combinaison de touches Annuler ()
Application.OnKey "ü"
Fin du sous-marin
Noter:
Souvent, la configuration des raccourcis clavier est effectuée lors de l'ouverture d'un classeur particulier. Pour cela, double-cliquez sur l'entrée Ce classeur dans l'explorateur de projet dans l'environnement de développement et enregistrez l'événement suivant :
Sous classeur privé_Ouvrir ()
Raccourci de configuration
Fin du sous-marin
L'événement Workbook_Open est automatiquement exécuté (s'il est défini) lorsque le classeur est ouvert. Dans notre cas, la procédure Configuration de combinaison de touches est appelée ici.
Ceci est utile si vous supprimez la combinaison de touches précédemment configurée lorsque vous fermez ce dossier. L'événement Workbook_BeforeClose est automatiquement exécuté lorsque le dossier est fermé. Dans ce cas, la procédure Clé de déverrouillage est appelée :
Private Sub Workbook_BeforeClose (Annuler en tant que booléen)
Combinaison de touches Annuler
Fin du sous-marin
Cela signifie que vous avez toujours vos raccourcis clavier sous contrôle dans Excel.