Arrotondamento per eccesso a 0,5

[ab6499]

Salve a tutti,
ho un problema con gli arrotondamenti della prima cifra decimale al 5 o all'intero per eccesso. Mi spiego meglio, vorrei fare:

1,1 ===> 1,5
1,2 ===> 1,5
1,3 ===> 1,5
1,4 ===> 1,5
1,5 ===> 1,5

1,6 ===> 2
1,7 ===> 2
1,8 ===> 2
1,9 ===> 2

Grazie molte a tutti
Aldo

[agenti]

dovresti fare una funzione...

o provare ad usare round()

[ab6499]

Ho provato con il Round, però mi arrotonda all'intero:

1,3 ===> 2
1,7 ===> 2

si, probabilmente ci vuole una funzione, ma cosa ci scrivo dentro?

Grazie
Aldo

[agenti]

round(1.3,2)



function arrotonda_decimale(valore)
tarr= split(valore,",")
if UBOUND(tarr) > 0 then
decimale = tarr(1)
if cint(decimale) < 5 then
decimale = 5
arrotonda_decimale = tarr(0) & "," & decimale
else
arrotonda_decimale = round(valore,0)
end if
else
return valore
end if
end function

non testata...

[ab6499]

OTTIMO! Funziona!
Ho fatto solo qualche piccolo accorgimento.
Ecco il codice

function arrotonda_decimale(valore)
tarr= split(valore,",")
if UBOUND(tarr) > 0 then
decimale = tarr(1)
if cint(decimale) < 6 and cint(decimale)> 0 then
decimale = 5
arrotonda_decimale = tarr(0) & "," & decimale
else
arrotonda_decimale = round(valore,0)
end if
else
return valore
end if
end function