Thema: VBA Rechenfehler Zeit Min <-> Sek | Herbers Excel-Forum

Hallo zusammen,
eigentlich ganz einfach, ich habe 2 Spalten, in A steht Zeit in Min, in B die Zeit in Sek.
A errechnet sich aus B. z.B. in A1 steht: =B1/60
Soweit so gut.
Wenn ich nun per VBA prüfe, ob die Werte zueinander passen, kommt bei Eingabe von 31 Sekunden in B1 für die Prüfung

MsgBox [b1] = [a1] * 60

FALSCH raus. WARUM?
Ich verstehe das nicht. Bei allen anderen Zeiten (außer 31 und 62 Sekunden, 93 geht wieder) funktioniert das.
Rechnet hier VBA anders als Excel? Und wenn ja wie?
Wenn ich mir das Ergebnis "[a1]*60" in eine Zelle schreiben lasse, dann steht da wieder die 31.
Das gibt es doch nicht.
Gruß
Björn B.

(ohne weiteren Text)

... ich weiß schon, dass ich das auch anders prüfen kann und dann kommt WAHR.

    MsgBox [b1] = [a1] * 60 'Hier kommt FALSCH
MsgBox [a1] = [b1] / 60  ' Hier kommt WAHR

Ich will aber wissen, warum das so ist. Das darf doch eigentlich nicht passieren.
Wer sagt mir denn, dass Deine Berechnung nicht bei irgendeiner anderen Zeit einen Fehler bringt?
Irgendwas muss hier doch VBA falsch machen.
Wie kann ich das zuverlässig prüfen?
Gruß
Björn

Hi Björn,
"Das darf doch eigentlich nicht passieren."?
Doch, mit der Anzeige der Differenz wollte ich dir zeigen, dass das "FALSCH" durchaus ok ist.
Such mal hier bei "Alle Recherchen" z. B. nach Rechengenauigkeit.
31/60 ist ein unendlicher Dezimalbruch. In so einem Computer gibt es aber nur endlich viele Speicherplätze.
Deshalb wird der Wert natürlicherweise nicht genau gerechnet/gespeichert,
die Genauigkeit ist auf eine mehr oder weniger bestimmte Stellenzahl begrenzt.
Hier beträgt sie ca. signifikante 15 Stellen. Dahinter kann irgend etwas stehen.
Bei zwei mathematisch gleichen Werten können sich die Stellen dahinter unterscheiden,
wenn die Werte auf unterschiedliche Weise berechnet wurden.
Oft ist ein Ausweg, die Werte vor dem Vergleich noch mal zu runden.
Oder man prüft statt
a = b * c
die Differenz auf einen zulässigen Maximalwert:
Abs(a - b * c) < 0.000000000001
Bei großen Zahlen kann es natürlich genauso gut Probleme geben.
Die Formeln der Zeile 2 sind hier nach unten kopiert:

	A	B	C	D
1	111111111111111	111111111111111	111111111111111,0000000000	11111111,000000000000000
2	222222222222222	777777777777777	15873015873015,9000000000	1587301,571428570000000
3	444444444444444	5444444444444440	2267573696145,1200000000	226757,367346939000000
4	888888888888888	38111111111111100	323939099449,3030000000	32393,909620991200000
5	1777777777777780	266777777777778000	46277014207,0433000000	4627,701374427320000
6	3555555555555550	1867444444444440000	6611002029,5776200000	661,100196346760000
7	7111111111111100	13072111111111100000	944428861,3682310000	94,442885192394300

Formeln der Tabelle

Zelle Formel A2 =A1*2 B2 =B1*7 C2 =C1/7 D2 =D1/7

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Danke.
Sowas ähnliches habe ich vermutet.
Trotzdem verstehe ich nicht, warum VBA anders als Excel rechnet, dachte, die haben die gleiche Rechengenauigkeit.
Ich verstehe auch nicht, warum die Makro-Berechnung "falsch" rechnet, wenn ich die Ergebnisse aber anzeigen lasse oder in eine Zelle schreibe, dann sind sie wieder richtig...
Komisch.
Naja, wenigstens weiß ich jetzt, wie ich das ganze umgehen kann.
Vielen Dank für Deine Hilfe.
Gruß
Björn B.