Hallo liebe Excel Profis, ich verzweifele seit Tagen an einer (für euch wahrscheinlich) ganz einfachen Aufgabe.
Ich möchte die errechneten Werte der Zellen A1 bis A3 in VBA addieren und in A4 ausgeben lassen.
Dieses wollte ich erreichen mit dem Befehl:
.Range("A4") = Application.Sum(Range("A1:A3"))
oder alternertiv mit
.Range("A4") = Application.WorksheetFunction.Sum(Range("A1:A3"))
Berechne ich dieses ohne VBA mit dem Befehl =Summe(A1:A3) bekomme ich das korrekte Ergebnis. Als Berechnung mittels VBA weicht das Ergebnis immer um einige Cent ab.
Um Nachkomma Werte abzurunden habe ich diese auf 2 Nachkomma Stellen begrenzt
.Range("A1") = Round(Range("A1"), 2)
.Range("A2") = Round(Range("A2"), 2)
.Range("A3") = Round(Range("A3"), 2)
.Range("A4") = Round(Range("A4"), 2)
Alle Zellen sind formatiert als Zahl mit 2 Nachkomma Stellen.
Wer kann mir helfen