ich habe ein Problem und komme absolut nicht weiter.
Ich habe eine Tabelle, welche durch jeweils 2 Leerzeilen in Abschnitte unterteilt ist.
Unter jeden Abschnitt in die erste Leerzeile, Zelle z.B. F20 soll er nun die Summe der vorstehenden Werte bilden. Also F19 bis F10. Die Zelle F20 wähle ich per Offset in einem anderen Makro aus.
Der Code unten gibt mir den Anfang F19 und das Ende F10 aus, nur weiß ich nicht wie ich das in die Summenformel einbauen kann.
Die Fehlermeldung lautet: Laufzeitfehler 1004 - Anwendungs- oder Objektdefinierter Fehler
Sub Zeilen_nach_oben_bis_1_Leerzeile_zählen()
Dim Zeilenzahl As Long
Zeilenzahl = Selection.CurrentRegion.Rows.Count - 1
'MsgBox Zeilenzahl
ActiveCell.Formula = "=Summe(" & Zeilenzahl & " : " & ActiveCell.Row - 1 & ")"
End Sub
Vielleicht kann mir jemand von den Profis helfen :)
Dankeschön.
Vg Olli