ich verzweifel bald. Ich möchte einfach per Tastendruck einen Befehl ausführen. D.h. wenn der Anwender in eine Zelle eine Taste drückt (das Minuszeichen), dann soll folgender Code ausgeführt werden.
---------------------------------------------------------------
If ActiveCell.Value = "-" Then
ActiveSheet.Cells(ActiveCell.Row, ActiveCell.Column + 1).Select
Else
ActiveCell.Value = "'-"
ActiveSheet.Cells(ActiveCell.Row, ActiveCell.Column + 1).Select
End If
---------------------------------------------------------------
Also... die Zelle wird auf Inhalt geprüft. Dann erfolgt ein Eintrag und der Cursor springt auf die nächste Zelle.
Mehr möchte ich doch garnicht...
Kann jemand helfen ?????
Vielen Dank
Stefan