Excel VBA Summe unter Liste
09.10.2012 11:49:23
xltyp
Ich habe eine Liste von Werten in den Spalten A und B (A ist die Bezeichnung, B ein Preis).
Unter dem letzten Preis soll nun die Summe dieser angezeigt werden.
Da die Werte mittels einer Schleife von VBA eingetragen werden, kann ich die Formel nicht einfach so setzen und auch Cells(12,2) funktioniert nicht ohne weiteres.
Deshalb gehe ich momentan mit
Dim y, x As Integer
y = 5
x = 2
While Not Cells(y, x) = ""
y = y + 1
Wend
Alle Felder durch, bis das letzte (gefüllte) erreicht ist. Wie kann ich aber nun alle darüberliegenden über eine Formel addieren? Klar kann ich in einer Double-Variable alle Werte addieren, aber bei einer Änderung im Tabellenblatt wirkt sich das dann nicht aus. Sollte quasi in etwa so sein:
Cells(y,x) = "=SUMME()" - aber was trage ich in die Klammern ein? Ist ja immer unterschiedlich!
beste grüße,
xltyp