科学进位法的问题，急求！

hi209

<>请问如何用宏或vba编写：</P>
<>有两个小数相加之后再除以2，ex：（0.001+0.002）/2应该等于0.0015，<STRONG>条件1</STRONG>是运算的结果小数点后的保留位数与前面的小数位数相同；<STRONG>条件2</STRONG>是（前提：如果保留3位小数），小数点后第3为如果是奇数（1，3，5，7....）并且小数点后第4位为“5”的话，第3位数要进位；反之小数点后第3为如果是偶数（0，2，4，6....）并且小数点后第4位为“5”的话，第3位数不进位。</P>
<>那么（0.001+0.002）/2=0.002，如果是0.001+0.000=0.000</P>