Könnte mir Bitte jemand sagen wie Ich mit der Eingabetaste nur zu den Eingabefeldern komme.Zb. C6-F6-L6 Dann nächste ZeileC7-F7-L7 usw bis L52
Danke im voraus.
Heinz
Private Sub Worksheet_Activate()
ActiveSheet.EnableSelection = xlUnlockedCells
End Sub
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Row = 1 Or Target.Count > 1 Then Exit Sub
If Target.Column = 3 Then Target.Offset(0, 3).Select
If Target.Column = 6 Then Target.Offset(0, 6).Select
If Target.Column = 12 Then Target.Offset(1, -9).Select
End Sub