Thema Datum  Von Nutzer Rating
Antwort
28.12.2005 10:22:43 Tim
NotSolved
Blau Aw:Summe
28.12.2005 10:43:05 Rasta
NotSolved
29.12.2005 22:58:47 Tim
NotSolved
29.12.2005 23:10:24 Tim
NotSolved
30.12.2005 11:33:35 Rasta
NotSolved
06.01.2006 13:37:18 Tim
NotSolved

Ansicht des Beitrags:
Von:
Rasta
Datum:
28.12.2005 10:43:05
Views:
1203
Rating: Antwort:
  Ja
Thema:
Aw:Summe
Hi Tim,

du kannst ausserdem so eine formel angeben:

Columns("F:F").Select
ActiveCell.FormulaR1C1 = "=SUM(R[3]C:R[32]C)"


bei einer summenbildung kannst du nicht die gesamte spalte angeben, sondern nur einen bereich - auf diesen bereich musst du dich auch hier festlegen.
probiere doch mal den makro-recorder aus und setze eine formel/summe-funktion in excel-- und dann schaust du dir den code in vba an.

eine andere möglihckeit ist es, die einzelnen zeilen der spalte per code zu durchlaufen und zu addieren-- dauert aber viel zu lange meiner meinung nach.

dim zaehler as long
dim spalte as long

spalte = 1
zaehler = 1

dim summe as double

do until cells(zaehler, spalte) = "END"

summe = summe + cells(zaehler, spalte)

zaehler = zaehler + 1
loop

musst natürlich am ende der spalte ein "END" setzen

hoffe es hilft

viele grüße

rasta
(ps- warum antwortest du nicht auf den original beitrag?)

Tim schrieb am 28.12.2005 10:22:43:

Möchte die Summe jedoch nur in VBA, da es für ein Schulprojekt notwendig ist.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
28.12.2005 10:22:43 Tim
NotSolved
Blau Aw:Summe
28.12.2005 10:43:05 Rasta
NotSolved
29.12.2005 22:58:47 Tim
NotSolved
29.12.2005 23:10:24 Tim
NotSolved
30.12.2005 11:33:35 Rasta
NotSolved
06.01.2006 13:37:18 Tim
NotSolved