Range(Variable1:Variable2) ohne $
28.03.2018 12:59:11
Jakob
Der Code bisher:
Dim Start As Range
Dim Ende As Range
Dim Summe As Range
Set Start = Cells.Find(What:="Komplex1", LookAt:=xlWhole).Offset(1, 7)
Set Ende = Cells.Find(What:="Komplex2", LookAt:=xlWhole).Offset(-1, 7)
Set Summe = Cells.Find(What:="Zwischensumme Komplex1", LookAt:=xlWhole).Offset(0, 7)
Summe.Formula = "=Sum(" & Range(Start, Ende).Address & ")"
Ergebnis: =SUMME($I$6:$I$36)
Gewolltes Ergebnis: =SUMME(I6:I36)
Grüße aus Bremen