Application OnKey
10.05.2002 09:37:53
Wilhelm R.
mit folgendem wird ein Makroaufruf auf die Enter Taste im Ziffernblock gelegt, gleichzeitig soll dann aber die normale Return Taste inaktiv sein:
Sub auto_open()
''legt die Überprüfung der Eingabe in Spalte D auf "Return" im Ziffernblock
Application.OnKey "{ENTER}", "StartBeiEnter"
Application.OnKey "{RETURN}", ""
End Sub
Sub auto_close()
Application.OnKey "{ENTER}"
Application.OnKey "{RETURN}"
End Sub
Sub StartBeiEnter()
Application.Run "Prüfen_Eingabe"
End Sub
nach dem Start der Arbeitsmappe ist aber Return weiterhin munter am Arbeiten.
Was mache ich grundsätzlich falsch?
Wilhem