Jetzt möchte ich das wenn ich Enter drücke automatisch C8 dann D8 dann E8 und dann die nächste Reihe B9, C9, D9, E9 und immer so weiter bis zum ende des Blattes angesprungen wird (Tab). Hoffe ihr könnt mir helfen. Danke im voraus
gr frank
If Traget.Column = 5 Then Target.Offset(1,-3).Select
So wird jedesmal, wenn in Spalte E ein Wert geändert wird, nach Drücken der Enter-Taste die Zelle in Spalte B in der nächsetn Zeile angesprungen.
Konnte ich helfen?
Ciao
Thorsten
Die Datei https://www.herber.de/bbs/user/42803.xls wurde aus Datenschutzgründen gelöscht
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 5 Then Target.Offset(1, -3).Select
End Sub