Makro: Formel um eine Zeile runterziehen

[dertommy]

Hallo!

Ich benötige ein Makro, welches mir die Formeln der letzten ausgefüllten Zeilen (Spalte Q bis CH) um eine Zeile runterzieht.

Vielen Danke für eure Hilfe.

[HKindler]

Hi,

weshalb braucht man so etwas? Excel macht das doch selbst, wenn man weiß, wie man damit umgeht. Stichworte: Intelligente Tabelle oder auch die Option "Datenbereichsformate und -formeln erweitern".

[dertommy]

das Runterziehen der Formeln soll erst nach einer bestimmten Prüfung erfolgen, darum

[HKindler]

Hi,

Code:

Dim i As Long
i = Cells(Rows.Count, "Q").End(xlUp).Row
With Range(Cells(i, "Q"), Cells(i, "CH"))
    .AutoFill .Resize(2)
End With

[dertommy]

Danke sehr, du hast mir sehr geholfen