Excel中将人民币小写转大写的公式？

Excel中将人民币小写转大写的公式？

工具/原材料

excel2018版、电脑。

1、打开电脑找到并双击打开excel2018新建工作表格；

2、双击打开excel新建工作表格以后，为了示范在A1输入好数字，在复制粘贴到B1中；

3、编辑数字并选中B1后，点击鼠标右键选择”设置单元格格式“的命令；

4、在弹出的对话框中点击特殊，并在右边的界面选择人民币大写点击确定；

5、设置并确定好以后，此时B1的单元格就自动的转换为大写；

6、也可以在单元格内直接输入v+数字，如：”v365874.51“选择大写的金额即可完成。

设A1列为数据列，则在A2输入以下公式(可复制):

=IF(A1<0,"负","")&IF(ABS(A1)>1,TEXT(TRUNC(ABS(ROUND(A1,2))),"[DBNum2]")&"元","")&IF(ISERR(FIND(".",ROUND(A1,2))),"",TEXT(RIGHT(TRUNC(ROUND(A1,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A1,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A1,2),3))=".",TEXT(RIGHT(ROUND(A1,2)),"[DBNum2]")&"分","整")

如果数据放在A1， 在B1中输入

=TEXT(100*A1,"[DBnum2]0拾0万0千0百0拾0元0角0分")

上次给你的那个少乘了100，会显示错误的。

A1输入数字，在B1或其它单元格输入公式：=IF(A1="","",IF(ROUND(A1,2)=0,"零",IF(ROUND(A1,2)<0,"负","")&IF(ROUND(ABS(A1),2)<1,"",TEXT(INT(ROUND(ABS(A1),2)),"[dbnum2]")&"圆")&IF(INT(ROUND(ABS(A1),2)*10)-INT(ROUND(ABS(A1),2))*10=0,IF(INT(ROUND(ABS(A1),2)*100)-INT(ROUND(ABS(A1),2)*10)*10=0,"","零"),TEXT(INT(ROUND(ABS(A1),2)*10)-INT(ROUND(ABS(A1),2))*10,"[dbnum2]")&"角")&IF((INT(ROUND(ABS(A1),2)*100)-INT(ROUND(ABS(A1),2)*10)*10)=0,"整",TEXT((INT(ROUND(ABS(A1),2)*100)-INT(ROUND(ABS(A1),2)*10)*10),"[dbnum2]")&"分")))

直接写公式，你会觉得把A1改成D5很不方便，你可以用这个工具还自动填写大定公式。