How can I emulate MROUND in VBA

[Jay Fincannon]

Hey All;

How can I convert this formula to VBA?

=MROUND((COUNT($B$1:$B413)/COUNT($B:$B)*100),5)
using the result of VBA's Find function as the changeable row number.

win98 excel2002

Thanks, Jay

 

[Myrna Larson]

If X contains your number, and Multiple is the 2nd argument to MROUND,

x = Round(x / Multiple, 0) * Multiple