Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
260to264
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
260to264
260to264
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Summe bilden

Summe bilden
01.06.2003 18:47:32
Ralf
Hallo alle zusammen
Wie bekomme ich es hin die summe einer spalte zb E zu bilden die nur die cellen beträagt die über der activen celle stehen

Also wenn ich in e 123 bin das die summe der zellen von e1 - e 122 gebildet wird und dies soll per Makro geschehen
Ich hab schon etwas gefunden aber jetzt komme ich nicht weiter

Cells(ActiveCell.Row + 1, 5).Formula =


MfG
Ralf

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Summe bilden
01.06.2003 18:54:38
Georg_Zi
Hallo Ralf

Cells(ActiveCell.Row, 5).Formula = "=Sum(" & ActiveCell.Offset(-1, 0).Address & ":E1)"

Gruß Hajo

Der Code wurde getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Re: Summe bilden
01.06.2003 19:09:23
Klaus-Dieter
Hallo Ralf,

versuche es mal so:


Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim r As Integer, summe As Single
For r = 1 To ActiveCell.Row
summe = summe + Cells(r, 5).Value
Next r
Cells(1, 6) = summe
End Sub

Code eingefügt mit: Excel Code Jeanie

Tabelle mit Ergebnis:

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige