Hallo, ich habe eine Frage zu meinem VBA Code. Und zwar sollen verschiedene Tastatureingaben verschiedene Funktionen triggern. Bei Zahlen, Buchstaben, Plus, Minus, "&"-Zeichen, "!"-Zeichen und einige andere Tasten gehen. "*"-Zeichen, Prozent, "(" und ")" bspw. gehen jedoch NICHT (als KeyCode wird 0 zurückgegeben). Hat jemand eine Ahnung woran das liegt?
Private Sub UserForm_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
handleKeyDown KeyCode, Shift
End Sub
Private Sub handleKeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Dim keyChar As String * 1
keyChar = Chr(KeyCode)
MsgBox (KeyCode)
Select Case keyChar
Case "0"
numb0_Click
Case "1"
numb1_Click
'.....
Case Else
End Select
Select Case KeyCode
Case "187"
plus_Click
'....
Case Else
End Select
End Sub
Danke für alle Antworten,
Nicolas