werte auf nächsten 1000er runden

[glkgereon]

auf runden!

ich würde es so machen:

Result:=(trunc(Value/1000)+1)*1000; also durch tausend
nachkommastellen abschneiden
plus 1 (AUFrunden)
mal tausend

kleiner fehler für dich: wenn die zahl 1000 ist, käme 2000 raus....

is aber nicht schwer