WorksheetFunction.Even (Excel)

Returns number rounded up to the nearest even integer. You can use this function for processing items that come in twos. For example, a packing crate accepts rows of one or two items. The crate is full when the number of items, rounded up to the nearest two, matches the crate's capacity.

If number is nonnumeric, Even returns the #VALUE! error value. Regardless of the sign of number, a value is rounded up when adjusted away from zero. If number is an even integer, no rounding occurs.

Even (Arg1)

Arg1: Number - the value to round.

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