Round no sirve con pares y 0,5

[Sea]

Necesito redondear un número y para ello he usado la fucnión Round, sin embargo me topé con que Round, NO FUNCIONA SI LA UNIDAD ES PAR y el decimal es 5 vale decir, los números , que terminan en 2,2 4,5 6,5 8,5 y 0,5 .
Había oensado en analizar el numero construyendo una funcion para que distnga pares e impares....pero la verdad es que creo en la posibilidad de hallar otra solución.
Si alguien sabe de algo...por favor...posteeee.....

De antemano ....Gracias

[Skalitiko]

al parecer, la función round, redondea hacia abajo es decir si tienes 0.5 lo redondea a 0, en cambio si tienes 0.6, lo redondea a 1

[Mickel]

Round(numero + 0.001) deberia servir

[txarly]

La forma de trabajar de la función Round es la siguiente:

Dim var1, var2, var3, var4, var5
var1 = Round(1.5) ' var1 contains 2
var2 = Round(2.5) ' var2 contains 2
var3 = Round(3.5) ' var3 contains 4
var4 = Round(0.985, 2) ' var4 contains 0.98
var5 = Round(0.995, 2) ' var5 contains 1.00

Tambien puedes utilizar las funciones Int o Fix que se quedan con la parte entera del argumento que le pasas:

MyNumber = Int(99.8) ' Returns 99.
MyNumber = Fix(99.2) ' Returns 99.
MyNumber = Int(-99.8) ' Returns -100.
MyNumber = Fix(-99.8) ' Returns -99.
MyNumber = Int(-99.2) ' Returns -100.
MyNumber = Fix(-99.2) ' Returns -99.

Un saludo
Txarly