Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
816to820
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
816to820
816to820
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellen aufaddieren

Zellen aufaddieren
02.11.2006 21:09:37
Stefan
Hallo,
hab mal wieder ein Problem und steh auf der Leitung.
Muss die Werte in der Spalte B per Makro aufaddieren, wobei es immer eine unterschiedliche Zeilenanzahl ist. Ein Makro hab ich schon dafür in meinem Buch gefunden. Aber es steht nicht drin, wie ich diese Summe dann in die Spalte B unterhalb dieser Werte einsetze?
Wer kann mir hierzu einen Tipp geben. Es muss unbedingt mit einem Makro laufen.
Schon mal Danke für Eure Hilfe.
Gruß
Stefan

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen aufaddieren
02.11.2006 21:21:17
Stefan
Hallo Stefan,

Private Sub Zahl_in_unterste_Zeile_der_Spalte()
Dim meineSumme As Double
meineSumme = 40
Range("B" & Range("B64000").End(xlUp).Row + 1).Value = meineSumme
End Sub

Dabei die Zahl 40 durch die berechnete Summe ersetzen.
Schoene Gruesse
Stefan
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige