|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
本帖最后由 xinyuezhang 于 2012-12-22 11:33 编辑
漆采购计划 - 副本.zip
(9.48 KB, 下载次数: 16)
=IF(ROUND(F11,2)<0,"无效数值",IF(ROUND(F11,2)=0,"零",IF(ROUND(F11,2)<1,"",TEXT(INT(ROUND(F11,2)),"[dbnum2]")&"元")&IF(INT(ROUND(F11,2)*10)-INT(ROUND(F11,2))*10=0,IF(INT(ROUND(F11,2))*(INT(ROUND(F11,2)*100)-INT(ROUND(F11,2)*10)*10)=0,"","零"),TEXT(INT(ROUND(F11,2)*10)-INT(ROUND(F11,2))*10,"[dbnum2]")&"角")&IF((INT(ROUND(F11,2)*100)-INT(ROUND(F11,2)*10)*10)=0,"整",TEXT((INT(ROUND(F11,2)*100)-INT(ROUND(F11,2)*10)*10),"[dbnum2]")&"分")))
|
|