Hallo,
durch den folgenden code ermittle ich die letzte Zeile in der Spalte 14
zeilenanzahl = ActiveSheet.Cells(Rows.Count, 14).End(xlUp).Row
Jetzt möchte ich 3 Zeilen unter dieser Zeile in der Spalte 15 eine Formel reinschreiben. Die Formel lautet eigentlich:
=Zählenwenn(O2:letze Zeile der Spalte O;"X")
Das Auswählen der Zelle funktioniert nur das Einbinden der Variablen in derr Formel haut nicht hin.
Cells(zeilenanzahl + 4, 15) = "=COUNTIF(R[-zeilenanzahl]C:R[-5]C,""X"")"
Wie müßte obige Zeile abgewandelt werden damit es funktioniert.
Vielen Dank.
Gruß
Jakob