Domino 9 und frühere Versionen > ND6: Entwicklung
Abrunden auf zwei Dezimalstellen
Bille:
Hallo,
ich muss eine Zahl auf 0,05 abrunden.
In Excel gibt es dazu die Funktion Untergrenze(Zahl; 0,05)
2,419 --> 2,40
2,878 --> 2,85
Gibt es sowas in LotusScript auch? Mit Round bekomme ich das nicht so hin.
Ich hab jetzt folgende Krücke verwendet, denke aber, dass es einfacher und schöner gehen müsste ...
--- Code: --- Basis = Int(Basis*100)
Basis = (Basis - (Basis Mod 5)) / 100
--- Ende Code ---
Bille
*** edit: Fehler in Code ausgebessert ***
koehlerbv:
Hallo Bille,
LotusScript bietet hierfür nur Round, was Dein Problem natürlich nicht löst. Du musst da also selber ran, was Du ja schon gemacht hast (ein Zweizeiler statt ein Einzeiler - das ist doch immer noch elegant ;)).
Das Excel (oder auch 1-2-3) das kann, ist naheliegend - im Gegensatz zu Notes ist die Hauptaufgabe von Excel ja auch das Rechnen.
By the way: Musst Du in Zeile 2 nicht durch 100 dividieren statt zu multiplizieren?
Bernhard
Bille:
Ups, natürlich muss die Zahl zum Schluss durch 100 geteilt werden. :o
Hab's gerade in dem ersten Post abgeändert.
koehlerbv:
Und ich habe Deinen Code mal in meine "Raupensammlung" eingefügt. Vielen Dank, Bille - irgendwann kann man das bestimmt mal brauchen!
Bernhard
Bille:
Da fühle ich mich geehrt.
Schönen Sonntag noch!
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln