Spaltensumme mit VBA
24.10.2002 21:25:18
ewald
das nachfolgende Makro berechnet die Summe der Spalte B.
Ich möchte die Summe der Spalten B:E. Wie lautet das Makro?
Sub Summe()
Dim i As Range
Set i = Cells(Rows.Count, 2).End(xlUp)
With i.Offset(1, 0)
.Formula = "=sum(B4:B" & i.Row & ")"
End With
End Sub
Vielen Dank.
Grüße