Am 25.05.2017 um 13:48 schrieb Mechtilde: > Hallo Wolfgang, > > mit der Funktion "Runden" wir auf die nächste ganze Zahl gerundet.
Das weiß ich; aber das eintscheidende ist, die Funktion RUNDEN ist eine *Calc*-Funktion, keine *Basic*-Funktion. Das Makro schreibt Calc-Formeln in Tabellenblatt-Zellen. Damit kann ich aber nix anfangen; ich muss *in Basic* runden, nicht in /Calc/. > Damit > dies auf für Dezimalzahlen mit festen Nachkommastellen , wie bei > Beträgen, funktioniert, muss zunächst die Zahl, die gerundet werden soll > mit 100 multipliziert werden, dann ge"rundet, und dann wieder durch 100 > geteilt werden. In Calc aka dem Tabellenblatt kann ich auch problemlos mit der Funktion AUFRUNDEN aufrunden; das ist nicht das Problem. Das Problem ist, dass ich das im *Makro* brauche, nicht in einer /Zelle/. > Sollte die Funktion immer nur abrunden, muss vor der Multiplikation mit > 100 noch 0,5 addiert werden. Das hab ich schon probiert; vielleicht bist Du da ja anderer Ansicht, aber *meiner* Meinung nach sind Formeln wie | myTypA = (int(myTypB+0.5)/15) + ((int(myTypC+0.5)*20+0.5)/5)/(int(myTypD) + (int(myTypA+0.5)/30)) wirklich nicht mehr übersichtlich. Selbst das 'Original' | myTypA = (Aufrunden(myTypB)/15 + Aufrunden(myTypC*20)/5)/(Abrunden(myTypD) + Aufrunden(myTypA)/30) ist schon hart an der Grenze (aber noch(!) verstehbar). Wolfgang -- --------------------------------------------------------------------- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected]
