Ich will in einem Tabellenblatt in einer Excel-Mappe bei jedem Tastendruck eine Sounddatei abspielen.
In einer Textbox im Userform hab ich das schon hingekriegt mit
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Call Modul1.WAValsStart
End Sub
(in einem Modul hab ich vorher Declare Function sndPlaySound32 usw. gemacht)
Mein Problem ist, dass es meines Wissens kein
Private Sub Worksheet_keypress
gibt.
Private Sub Worksheet_change
hilft mir nicht weiter, da ich es nicht hinkriege, dass der Sound sofort bei Tastendruck ausgeführt wird.
Hab auch ein bisschen mit Application.OnKey rumprobiert, aber erstens weiß ich nicht wie ich das für alle (und nicht nur einzelne Tasten) definiere und zweitens soll die ursprüngliche Funktion der Tasten beibehalten werden.
Worksheet_BeforeRightclick funktioniert, ich will den Sound ja aber nicht bei einem Mausklick sondern bei Tastendruck haben.
Ich hoffe, ich konnte mein Problem verständlich machen!
Über Hilfe würde ich mich freuen!
fLoRiAn