ich möchte Formeln per VBA zeilenweise "nach unten kopieren", sobald eine Eingabe in mindestens eine vorher zu befüllender Zellen erfolgt ist. Die genannten Zellen sind nicht zwingend Bestandteil/Variable in der zu kopierenden Formel. Sprich: in Zeile 2 steht ein Datensatz mit Eingabewerten in den Spalten A:C, Formeln stehen in D und E. Wenn in A3:C3 etwas eingetragen wird, sollen die Formeln entsprechend runterkopiert werden. Mit worksheet change geht es irgendwie, ich versuche hierfür den folgenden Code zu verstehen, aber: leider verstehe ich gerade nur "Bahnhof"
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column 1 Then Exit Sub
If IsEmpty(Target) Then Exit Sub
On Error GoTo ERRORHANDLER
Application.EnableEvents = False
Range(Cells(Target.Row - 1, 2), Cells(Target.Row - 1, 256)).Copy _
Range(Cells(Target.Row, 2), Cells(Target.Row, 256))
Application.CutCopyMode = False
ERRORHANDLER:
Application.EnableEvents = True
End Sub
Wie kann ich modifizieren, dass ich auch die Bedingung, d.h. die Eingabespalten (im Beispiel oben A:C) und den Bereich, der kopiert werden soll, selbst bestimmen kann? Kann mir da jemand helfen?
Viele Grüße
Daniel