Office: Tastatur-Ereignis auslösen

Hi zusammen,
ich habe folgendes Problem:
Wenn meine UserForm geladen ist, sollte durch das drücken der Pfeiltasten je eine Ereignis ausgelöst werden.
Wie heisst das Ereignis?

Ich habe was mit keypress, keydown und keyup gelesen.
Aber die Events werden nicht ausgelöst bei mir.

versuchter Code:
Private Sub KeyPress(KeyAscii As ReturnInteger)
Msgbox("Test")
end sub
und:
Private Sub Form_KeyPress(KeyAscii As ReturnInteger)
Msgbox("Test")
end sub

Vielen Dank für die Hilfe
Gruß
Karl

:)

 

Hallo Karl,

Das Ereignis, könnte heissen:
Code:

Alllerdings, glaube ich nicht, dass Du damit glücklich wirst. Die Key-Events werden immer zuerst an das Steuerobjekt geschickt, dass den Fokus hat und das ist in den seltensten Fällen die Userform selbst.

 

Als Ereigniss kannst du KeyUp oder KeyDown verwenden. Du wirst für das Userform und alle Schaltflächen ein solches Ereigniss einrichten müssen.
Z.B:
Code:

 

Hi,
danke für die Antwort.
Ich hab mal den Code in einer neuen UserForm getestet, und es klappt einwandfrei. Der Fehler lag also darin, dass (irgendein) Steuerelement in meinem Programm aktiv war und nicht die UserForm selbst, und somit das Ereigniss nicht in der UserForm ausgelöst wurde.

Wie würdest du/ihr dann folgendes lösen:
Ich habe eine Userform mit einer Multipage (7Seiten), auf einer Seite sollte ein Steuerelement sein (z.B. Commandbutton,Togglebutton), das, sofern es aktiv ist, die kypress-Ereignisse empfängt.
Es sollte klar erkenntlich sein für den Anwender, ob das Steuerelement noch aktiv ist oder nicht (z.B. durch drücken anderer Buttons).

Vielen Dank
Karl