Gruppen

Top Gruppen: Windows 7; Windows Vista; Windows XP; Textverarbeitung; Excel; DSL; Internet Browser; E-Mail/Outlook
Betriebsysteme: Windows classik; Linux; BS-Sonstige
Software: Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; SW-Sonstige
Hardware: Mainboard/CPU; Grafikkarten; Peripherie; Laptop/Notebook; HW-Sonstiges
Netzwerk: Telefon,ISDN,Modem; W-Lan; NW-Sonstiges
Programmierung: PHP,ASP,Perl...; Java,C++...; Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke; SN Intern; Test

/ Forum / Skripte(PHP,ASP,Perl...)

Skripte(PHP,ASP,Perl...)

Fragevon Catze vom 22.05.2019, 10:13 Options

VBA: Bei WorksheetFunction.sum wird automatisch gerundet - warum? und was dagegen tun?

Hallo zusammen,

bin mal wieder auf Eure Hilfe angewiesen. Habe folgenden 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

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 schreiben

Antwort 1 von Flupo vom 22.05.2019, 10:35 Options

Ich habe zwar

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 vom 22.05.2019, 11:13 Options

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

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Tipp einschicken

News einschicken