Supportnet / Forum / Skripte(PHP,ASP,Perl...)
VBA: Bei WorksheetFunction.sum wird automatisch gerundet - warum? und was dagegen tun?
Frage
Hallo zusammen,
bin mal wieder auf Eure Hilfe angewiesen. Habe folgenden Code:
[code]x = WorksheetFunction.Sum(Sheets_("Zusammenfassung_Fertigung").range(Sheets_("Zusammenfassung_Fertigung").cells(9, 3), Sheets_("Zusammenfassung_Fertigung").cells(i, 3)))
Sheets("Zusammenfassung_Fertigung").cells(i + 1, 3).Value = x[/code]
Die Summe wird immer gerundet. 1,5 + 1,2 ergibt somit 3 anstatt 2,7. Was kann ich dagegen tun?
Vielen Dank im Vorraus schonmal!
Catze
Antwort 1 von Flupo
Ich habe zwar
Definiere den Datentyp für die Variable x als Dezimalzahl:
Falls das auch nicht funktioniert überprüfe mal die Zellformatierung der Ausgabezelle. Könnte sein, dass dort das Problem liegt.
Gruß Flupo
WorksheetFunction.Sum(
in der Hilfe nicht gefunden aber probiere mal folgendes aus:Definiere den Datentyp für die Variable x als Dezimalzahl:
DIM x As Single
Falls das auch nicht funktioniert überprüfe mal die Zellformatierung der Ausgabezelle. Könnte sein, dass dort das Problem liegt.
Gruß Flupo
Antwort 2 von Catze
Hi Flupo,
Danke schön!!! Das mit dem single war der Fehler ...
Vielen Dank auf jeden Fall, ich versuch jetzt mal vom Schlauch zu hüpfen ;p
Catze
Danke schön!!! Das mit dem single war der Fehler ...
Vielen Dank auf jeden Fall, ich versuch jetzt mal vom Schlauch zu hüpfen ;p
Catze