返回目录：excel表格制作
金额填写好了，大写怎么办？
每次都用一个一个敲上去吗？
如果套打，很多怎么办呢？
今天我们就来分享一下小写转人民币大写的做法，多种方法，由简单到方便智能，全部收罗，彻底搞定这个问题。
一般有两种情况
情况1：报销单上的大写 。
这种大写，比较简单，按位补齐对应的数值大写即可，不足的部分用零补全，一般我们使用×或者ⓧ是不标准的一种简写， 如果我们使用Excel自动生成则使用零来处理
具体使用的公式：
=TEXT(INT(A1),"[dbnum2]0佰0拾0万0仟0佰0拾0元")&TEXT(ROUND((MOD(A1,1)*100),),"[dbnum2]0角0分")
以上公式A1单元格中存放小写金额，如果小写金额在其他位置，粘贴公式后替换一下即可
情况2：标准的大写，如果支票上的大写（有严格的规定）
比如这样
（图片素材来源网络，侵删）
这里的大写，我们可以通过几种方法来填写
第一种：输入法V关键字录入，方便快捷，适合零时使用
第二种：使用公式处理，不用每次都手动输入，方便
我们提供三种公式
公式1：
=SUBSTITUTE(SUBSTITUTE(IF(-RMB(A1),IF(A1<0,"负",)&TEXT(INT(ABS(A1)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(A1),2),"[dbnum2]0角0分;;整"),),"零角",IF(A1^2<1,,"零")),"零分","整")
公式2：
=SUBSTITUTE(SUBSTITUTE(IF(-RMB(A1),IF(A1<0,"负",)&TEXT(INT(ABS(A1)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(A1),2),"[dbnum2]0角0分;;整"),),"零角",IF(A1^2<1,,"零")),"零分","整")
公式3：
=TEXT(RMB(A1),"[=]g;"&TEXT(INT(ABS(A1)+0.5%),"[dbnum2]G/通用格式元;;")&SUBSTITUTE(SUBSTITUTE(TEXT(RIGHT(RMB(A1),2),"[dbnum2]0角0分;;整"),"零角",IF(A1^2<1,,"零")),"零分","整"))
----建议收藏备忘----
第三种：设置单元格格式（使用WPS），微软Excel不支持
（WPS2019演示）
（微软Excel无此功能，注意）
第四种：如果我们需要套打，则使用VBA更方便一些
使用自定义函数
Function DX(M)'185个字符 DX = IIf(Abs(M) < 0.005, a, Replace(Replace(Replace(Join(Application.Text(Split(Format(M, " 0. 0 0")), Split(" [DBnum2] [DBnum2]圆0角;;圆零 [DBnum2]0分;;整")), a), "零圆零", a), "零圆", a), "零整", "整"))End Function
今天就先到这里，更多精彩，关注小编，第一时间给您推送精彩内容