Hallo!
Ich hab mir in Meiner Excel Datei einen Makro geschrieben der mir von verschiedenen Tabellen einige werte ausliest und sie in eine Extratabelle schreibt. Jetzt hab ich allerdings ein Problem. Ich möchte nun eine Summe von den Werten haben. (zb.: A1-A19). Wie kann ich das realisieren. Die Anzahl der ausgelesenen Werte ist jedoch verschieden, die Summenberechnung muss also dynamisch sein!
mfg Reiter Georg
Hallo Georg.
Je nach dem, wie Du die Werte ausliest, brauchst Du eigentlich nur eine Variable zu deklarieren und dann bereits während des Auslesens den momentan gelesenen Wert zu der Variablen addieren.
Viele Grüße
Carsten.
Hi, am besten mit ner Do while Schleife, also folgendermaßen:
sub test()
'variablendeklaration
dim zeile as integer
const spalte as integer = 1 'jetzt geht er spalte eins runter
'(beim tausch von spalte und zeile kannst du auch spalten abgehen
dim Wert as long 'ist deine Variable, die die summen speichert
dim Ws as excel.worksheet 'geht besser so
set Ws =activeworkbook.sheets(1) 'je nachdem, in welches sheet du die Variable schreiben willst
zeile=7 :Start der Zeile
Do while len(ws.cells(zeile,spalte))0 'mache solange, wie die länge der aktuellen Zelle nicht null ist, also noch werte dastehen
wert=wert+ws.cells(zeile,spalte).value
zeile=zeile+1 'geht in die nächste Spalte loop 'beendet die schleife
ws.cells(1,2).value=wert
end sub
Hoffe, das hilft dir, sonst frag einfach
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Hy Carsten!
Besten Dank. Ich lasse jetzt eine Variable mitzählen und gib sie am schluss aus. Funktioniert prächtig.
mfg reiter georg
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]