arrotondare all'intero superiore

[m***@discussions.microsoft.com]

come da oggetto , come faccio ad arrotondare una cifra
decimale all' intero superiore es:
0,58 > 1

suppongo che la funzione arrotonda di excel qui non ci sia
sbaglio.................

[Nick]

Post by m***@discussions.microsoft.com
come da oggetto , come faccio ad arrotondare una cifra
0,58 > 1
suppongo che la funzione arrotonda di excel qui non ci sia
sbaglio.................

se lo vuoi sempre arrotondato all'intero superiore usa questa funzione:

public function arrotondasup(numero as double) as double
dim p_int as integer
dim p_dec as decimal

p_int = int(numero)
p_dec = numero - p_int

if p_dec >0 then
attorondasup = p_int+1
else
arrotondasup = p_int
end if

end function

poi la richiami così:

nomevar = arrotondasup(valore)

spero di aver capito cosa ti serve

ciao
Nick

[giorgio rancati]

Post by m***@discussions.microsoft.com
come da oggetto , come faccio ad arrotondare una cifra
0,58 > 1
suppongo che la funzione arrotonda di excel qui non ci sia
sbaglio.................

e invece c'è, non ha lo stesso comportamento con i decimali ma se devi
arrotondare all'unità non dovresti avere problemi.
-------------------------
Round(0.58) è uguale a 1
-------------------------

(spero che tu non debba arrotondare un listino prezzi, 0.42 centesimi sono
813 delle vecchie Lire)

Ciao Giorgio