代码改变世界

Excel 货币中文大写汉字转化

2011-03-26 11:39  破狼  阅读(1780)  评论(0编辑  收藏  举报

Excel转化货币数字为中文大写:例如:

效果图:

代码:

=IF(D8<1,IF(D8<0.1,TEXT(INT(D8*100),"[DBNum2]G/通用格式")&"",IF((INT(D8*100)-INT(D8*10)*10=0),TEXT(INT(D8*10),"[DBNum2]G/通用格式")&"角整",TEXT(INT(D8*10),"[DBNum2]G/通用格式")&""&TEXT(INT(D8*100)-INT(D8*10)*10,"[DBNum2]G/通用格式")&"")),TEXT(INT(D8),"[DBNum2]G/通用格式"&"")&IF((INT(D8*10)-INT(D8)*10)=0,IF((INT(D8*100)-INT(D8*10)*10)=0,"",""),IF((INT(D8*0.1)-INT(D8)*0.1)=0,"","")&TEXT(INT(D8*10)-INT(D8)*10,"[DBNum2]G/通用格式")&"")&IF((INT(D8*100)-INT(D8*10)*10)=0,"",TEXT(INT(D8*100)-INT(D8*10)*10,"[DBNum2]G/通用格式")&""))

 这个奖可以结合ASPOSE.Cells处理我的报表导出Excel的汇总,计算问题:报表中的Excel操作之Aspose.Cells(Excel模板) 唯一需要改变的就是D8这个单元汇总格是需要动态变更的,可以利用{r}。{-n},{c}等来处理。