Eigene Tastenkombinationen

Option Explicit

Private Sub Workbook_Open()

Application.OnKey "+{F1}", "Test"
Application.OnKey "{F1}", ""
Application.OnKey "{F4}", "Test1"

End Sub

'<--                {BACKSPACE}
'Pause              {BREAK}
'Hochstelltaste     {CAPSLOCK}
'Entf               {CLEAR}
'Entf               {DELETE} oder {DEL}
'Cursor runter      {DOWN}
'Cursor rauf        {UP}
'Cursor links       {LEFT}
'Cursor rechts      {RIGHT}
'Ende               {END}
'Enter auf Zehnertastatur   {ENTER}
'~ Tilde            {ENTER}
'Esc                {ESCAPE} oder {ESC}
'Hilfe              {HELP}
'Pos1               {HOME}
'Einfg              {INSERT}
'Num                {NUMLOCK}
'Bild runter        {PGDN}
'Bild rauf          {PGUP}
'Return             {RETURN}
'Tabulatortaste     {TAB}
'Tasten F1 bis F12  {F1} bis {F12}

'Tastenkombinationen mit Shift und/oder Alt und/oder STRG sind ebenfalls möglich.
'Shift              +(Plus-Zeichen)
'Strg               ^(Caret-Zeichen)
'Alt                %(Prozentzeichen)