WorksheetFunction.Even (Excel)

Devuelve un número redondeado al entero par más próximo. Puede usar esta función para procesar los elementos que vienen en dos. Por ejemplo, un cajón de empaquetado acepta filas de uno o dos elementos. El cráter está lleno cuando el número de elementos, redondeado a la dos más cercana, coincide con la capacidad del cajón.

Si el número es un valor no numérico, incluso devuelve el #VALUE! valor de error. Independientemente del signo del número, los valores se redondean hacia arriba. Si el argumento de número es un entero par, no se redondea.

Even (Arg1)

Arg1: Número: valor que se desea redondear.

Dim dblArg1 As Double: dblArg1 = 
Dim dblEven As Double
dblEven = WorksheetFunction.Even(Arg1:=dblArg1)