Hallo,
ich habe ein einndimensionales Array in VBA und ein Tabelle sagen wir drei Spalten
nun möchte ich den Inhalt der Spalten addieren und unterhalb der Spalten am Tabellenende jeweils die Summe ausgeben.
so addiere ich die Summenwerte:
if(wenn ein Zahlenfeld auftritt) dann
ReDim Preserve summe(summeCount)
summe(summeCount) = summe(summeCount) + rs.Fields(i).Value
summeCount = summeCount + 1
End if
summeCount += 1
jetzt habe ich das Phänomen dass das erste Arrayfeld wunderbar eine Summe ausgibt
aber die zwei anderen Felder nur den letzten Tabellenwert ausgeben