Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

summe von letzter zeile aus

Betrifft: summe von letzter zeile aus von: gladiator
Geschrieben am: 07.09.2004 21:58:46

hallo,
vielleicht kann mir jemand helfen....
ich habe eine tabelle, die unterschiedlich groß sein kann (anzahl zeilen).
wie man die letzte zeile per vba ermittelt weiß ich, jedoch kriege ich es nicht hin, dass von der letzten zeile aus bis nach oben (z.b. A1) die werte summiert werden. weiß jemand wie es geht?

gruß gladiator

  


Betrifft: AW: summe von letzter zeile aus von: P@ulchen
Geschrieben am: 07.09.2004 22:06:40

Hi,

zB. so:



Sub rechnen()
Dim aRow As Integer
aRow = Sheets("Tabelle1").Range("A65536").End(xlUp).Row
x = WorksheetFunction.Sum(Range("A1:A" & aRow))
MsgBox x
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5




Gruß aus Leipzig
P@ulchen

Das Forum lebt auch von den Rückmeldungen !


  


Betrifft: AW: summe von letzter zeile aus von: ypsilon
Geschrieben am: 07.09.2004 22:09:47

hi,
etwa so:

Sub summe()
MsgBox WorksheetFunction.Sum(Range(Cells(1, 1), Cells(Cells(Rows.Count, 1).End(xlUp).Row, 1)))
End Sub


cu Micha


  


Betrifft: zu spät dafür nur eine zeile ;-) o.t. von: y
Geschrieben am: 07.09.2004 22:11:16

.


  


Betrifft: meine Rache... von: P@ulchen
Geschrieben am: 07.09.2004 22:24:04

...für hier: https://www.herber.de/forum/messages/481788.html ...da warst Du schneller...

Ich bin schon ein harter Knochen... ;-))



Gruß aus Leipzig
P@ulchen


  


Betrifft: Danke für schnelle Antwort von: gladiator
Geschrieben am: 07.09.2004 22:29:31

es funktioniert..........vielen Dank!!


 

Beiträge aus den Excel-Beispielen zum Thema "summe von letzter zeile aus"