ich habe in der Spalte "a" die laufende Nr. stehen von 1 bis...
in der "Spalte B" möchte ich f4 reinschreiben dazu möchte ich die laufende schreiben, automatisch geht das Wie ?
gruß Walter
Sheet1 | |||||||||||||||||||||||||||||||||||||
| |||||||||||||||||||||||||||||||||||||
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Then Exit Sub
Application.EnableEvents = False
Target.Value = Target.Value & Target.Offset(0, -1).Value
Application.EnableEvents = True
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 3 Then Exit Sub
Application.EnableEvents = False
Target.Value = Target.Value & Target.Offset(0, -1).Value & Target.Offset(0, -2).Value
Application.EnableEvents = True
End Sub