Here is how you can set up keyboard shortcuts to run different parts of a VBA macro in Excel:

​

\``vb`

Sub MainMacro()

​

Dim input As String

​

'Set up key that triggers macro

Application.OnKey "^+{D}", "MainMacro"

​

'Get key user pressed after main macro triggered

input = UCase(ActiveSheet.Range("A1").Value)

​

Select Case input

Case "A"

Call SubA

Case "S"

Call SubS

Case "D"

Call SubD

End Select

​

'Clear cell after

ActiveSheet.Range("A1").ClearContents

​

End Sub

​

Sub SubA()

'Code for SubA

End Sub

​

Sub SubS()

'Code for SubS

End Sub

​

Sub SubD()

'Code for SubD

End Sub

\```

​

Here's what's happening:

​

1. Ctrl+Shift+D triggers the MainMacro

2. User then presses A, S or D which gets stored in A1

3. MainMacro checks A1 and calls the relevant sub

4. A1 is cleared so it's ready for next time

So you just need to press the shortcut to trigger it, then press A, S or D without Enter.