小数向上取整的实现

在EXCEL中有一个worksheet的函数 ceiling,它可以实现小数的向上取整。 比如

ceiling(1.0,1)=1
ceiling(1.1,1)=2
ceiling(1.5,1)=2
ceiling(1.9,1)=2
ceiling(2.0,1)=2

但在一般VB/VBA中可以通过标准的INT函数来实现。INT函数可以说几乎所有的编程语言中均有此函数或相近函数。

构思： 小数 f ， 对f取整，然后再判断f的小数部分是否为0
C
int(f)+(int(f)==f?1:0)
VB
INT(f) + IIF(INT(f)<>f,1,0)
或者利用 VB中true=-1
INT(f) -(INT(f)<>f)