Application.Keys

This property returns a collection of current keyboard accelerators for the associated document type.

This property is read only.

Syntax Parameters Return Value 
ReadOnly Property Application.Keys( _
    DocTypeForKeys As DocumentType) As Keys
 DocTypeForKeys [in]

Type: DocumentType

Keys

SVB Example

Adding custom hot keys: 

Option Base 1
Option Explicit
Sub Main
    MsgBox "Adding CTRL+Q to launch Basic Statistics from a spreadsheet"
    'Make CTRL+Q a hot key for open Basic Statistics when a spreadsheet 
    'is active. In the function "Add", 11 represents CTRL and 81 represents
    'Q (which is its ASCII table equivalent).
    Application.Keys(scSpreadsheet).Add(11,81,scCmdStatsBasicStatsTables)
End Sub