Bei meinem vba-Projekt möchte ich von einer Jahrestabelle automatisch den hinzugefügten Wert in eine Monatstabelle mit Worksheet_Change(ByVal Target As Range) ermöglichen.
If (Target.Column >= 7 And Target.Column <= 37) Then
Sheets("Januar 23").Range(Target.Address).Value = Range(Target.Address).Value
Jetzt wollte ich einen Offset hinzufügen, um auch die richtige Spalte für die weiteren Monate einfügen. Ich dachte halt mit .Offset(rowOffset:=3, columnOffset:=3), aber ich weiß nicht wie ich es einbinden kann. Ich habe an etwa sowas gedacht (funktioniert aber nicht):
ElseIf (Target.Column >= 341 And Target.Column <= 371) Then
Sheets("Dezember 23").Range(Target.Address.Offset(rowOffset:=334, columnOffset:=0)).Value = Range(Target.Address).Value
Ich würde mich freuen, wenn mir jemand helfen könnte
LG
|