Alles klar, vielen Dank für deine Unterstützung:
Die Tabelle sieht wie folgt aus:
Und das soll die zugehörige Makro sein:
Sub Formel_runter_kopieren()
'Formel aus L1 runterkopieren
Dim LastRow As Integer 'last row
With Worksheets("Target Data")
Application.ScreenUpdating = False
'letzte Zeile auffinden:
LastRow = Cells(Rows.Count, "B").End(xlUp).Row
'Formel für O und AG runterkopieren:
.Range(.Cells(2, 15), Cells(LastRow, 15)).Formula = "=IFERROR(INDEX(Deal_Stage,MATCH(RC[-13]&EDATE(RC[-14],-1),Deal_ID&Date_Stamp,0)),support!R2C1)"
End With
End Sub
Aber bei Übernahme der Formel, wird ein @ vor Die Spaltenbenennungen/Data Ranges "Deal_ID" & "Date_Stamp" gesetzt, warum? Ohne das @ funktioniert die Formel...
Viele Grüße und vielen Dank.
Marco
|