Excel合计金额自动转中文大写

发布时间 2023-04-20 15:11:03作者: 祁连山
如下表格即可实现:
 
 
 
A1 B1
A2 B2

 

 

B1单元格:=RMB(SUM(A1:A2), 2)

B2单元格:=IF(EXACT(RIGHT(B1, 2), "00"), TEXT(INT(B1), "[DBNUM2]") & "元整", TEXT(INT(B1), "[DBNUM2]") & "元" & IF(EXACT(MID(B1, LEN(B1) - 1, 1), "0"), "零", TEXT(MID(B1, LEN(B1) - 1, 1), "[DBNUM2]") & "角") & TEXT(INT(RIGHT(B1, 1)), "[DBNUM2]") & "分")