excel金额转大写的公式用法

Excel中怎么实现小写金额自动转换成中文大写金额EXCEL中数字小写换大写方法一：在单元格A2中输入小写数字123.12B2处输入以下公式=SUBSTITUTE(SUBSTITUTE(IF(A2<0,"负","")&TEXT(TRUNC(ABS(ROUND(A2,2))),"[DBNum2]")&"元"&IF(ISERR(FIND(".",ROUND(A2,2))),"",TEXT(RIGHT(TRUNC(ROUND(A2,2)*10) ),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A2,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A2,2),3))=".",TEXT(RIGHT(ROUND(A2,2)),"[DBN um2]")&"分",IF(ROUND(A2,2)=0,"","整")),"零元零",""),"零元","")EXCEL中数字小写换大写方法二：在单元格A2中输入小写数字123.12B2处输入以下公式=IF((INT(A2*10)-INT(A2)*10)=0,TEXT(INT(A2),"[DBNum2]G/通用格式")&"元"&IF((INT(A2*100)-INT((A2)*10)*10)=0,"整","零"&TEXT(INT(A2*100)-INT(A2*10)*10,"[DBNum2]G/通用格式")&"分"),TEXT(INT(A2),"[DBNum2]G/通用格式")&"元"&IF((INT(A2*100)-INT((A2)*10)*10)=0,TEXT((INT(A2*10)-INT(A2)*10),"[D BNum2]G/通用格式")&"角整",TEXT((INT(A2*10)-INT(A2)*10),"[DBNum2]G/通用格式")&"角"&TEXT(INT(A2*100)-INT(A2*10)*10,"[DBNum2]G/通用格式")&"分"))EXCEL中数字小写换大写方法三：=IF(A2-INT(A2)=0,TEXT(INT(A2),"[DBNum2]G/通用格式")&"圆整",TEXT(INT(A2),"[DBNum2]G/通用格式")&"圆"&TEXT(INT((A2-INT(A2))*10),"[DBNum2]G/通用格式")&"角"&TEXT(INT((A2*10-INT(A2*10))*10),"[DBNum2]G/通用格式")&"分") EXCEL中数字小写换大写方法四：=IF((A2-INT(A2))=0,TEXT(A2,"[DBNUM2]")&"元整",IF(INT(A2*10)-A2*10=0,TEXT(INT(A2),"[DBNUM2]")&"元"&TEXT((INT(A2*10)-INT(A2)*10),"[DBNUM2]")&"角整",TEXT(INT(A2),"[DBNUM2]")&"元"&IF(INT(A2*10)-INT(A2)*10=0,"零",TEXT(INT(A2*10)-INT(A2)*10,"[DBNUM2]")&"角")&TEXT(RIGHT(A2,1),"[DBNUM2]")&"分"))看看结果是不是出现了你想要的?应该有你需要的大写金额了公式的由来:仟分位公式如下:=TEXT(IF(LEN(INT($A1))>=4,MID($A1,LEN(INT($A1))-3,1),""),"[DBNum2]") 佰分位公式如下:=TEXT(IF(LEN(INT($A1))>=3,MID($A1,LEN(INT($A1))-2,1),""),"[DBNum2]") 第一位小数的公式:=TEXT(MID($A1,FIND(".",$A1)+1,1),"[DBNum2]")第二位小数的公式:=TEXT(MID(TEXT($A1,"0.00"),FIND(".",$A1)+2,1),"[DBNum2]") 其他依此类推^^^^^^^^^^^^^^^^用Excel函数将货币数值由阿拉伯数字自动生成为中文大写格式如图是全部用Excel函数自编农业银行转帐支票套打工具，图中内容是需要打印到转帐支票上内容，其中A-D列为支票存根部分，我们利用Excel函数对要填写大部分内容建立公式后，只要输入支票存根部分的三项基本信息（A6-A8单元格）：收款单位、金额、用途，其他内容全部自动生成。

如何将小写金额转换成大写金额函数公式一、小写金额转换为大写金额的函数公式小写金额转换成大写金额需要用到数学函数，具体的公式如下：设原小写金额为A，则大写金额为B1、先将原小写金额转换为整数，即A1=整(A)，其中“整()”表示向下取整。

2、将整数A1每四位一组分别进行处理，即将A1最高端的四位数字作为第一组处理，将第二组从右向左数的四位数字作为第二组处理，以此类推，直到将所有的数位进行分组处理，设分别为B1、B2、B3、B4、B5、B6，其中B1为纯整数，并按照从高到低的顺序依次存放各个分组。

3、对每个分组进行翻译，将“0”到“9”这十个基本数字转换为中文大写数字，例如“1”转换成“壹”、“2”转换成“贰”、“3”转换成“叁”等；将每个分组转换成中文大写金额，例如“一亿”、“十万”、“万”等；最后将所有分组的大写金额连接起来，即可得到最终的大写金额，也就是B。

具体的实现方法可以看下面的例子。

二、小写金额转换为大写金额实现过程例如，现将小写金额100,000.5元转换为大写金额为“壹拾万元伍角”。

1、先将小写金额100,000.5元转换为整数100,000元。

2、将整数100,000元每四位一组分别进行处理，得到B1=0，B2=1，B3=万，B4=0，B5=0，B6=0。

3、将分组B2和B3进行翻译，分别得到“壹拾”和“万”。

4、将分组B1和B4进行翻译，得到“零”。

5、将分组B5进行翻译，得到“元”。

6、将分组B6进行翻译，得到“伍角”。

7、将所有分组的大写金额连接起来，得到最终结果“壹拾万元伍角”。

三、小写金额转换为大写金额的注意事项1、当小数部分存在时，需对小数部分进行额外处理，将小数部分转换为中文大写金额的“角”和“分”。

2、当小写金额为零时，转换结果为“零元”。

3、当小写金额全为“0”时，转换结果为“零元零角零分”。

4、当小写金额为负数时，转换结果为“负壹圆”等。

综上所述，小写金额转换为大写金额需要使用数学函数以及中文大写数字，按照上述公式和步骤进行处理即可，注意特殊情况的处理，从而得到准确、生动、全面、有指导意义的转换结果。

利用Excel函数公式制作财务大写金额模板在Excel中制作财务大写金额模板可以通过使用Excel函数公式来实现。

下面将详细介绍如何使用Excel函数公式制作财务大写金额模板。

第一步：打开Excel并创建一个新的工作簿。

第二步：在第一个单元格（例如A1）输入要转换的数字金额。

第三步：在下一个单元格（例如B1）输入以下公式：=财务大写(A1)第四步：按下回车键，Excel将会自动把数字金额转换成大写金额。

接下来我们将详细介绍如何编写“财务大写”函数。

第一步：选中工具栏上的“开发工具”选项卡。

如果在Excel选项中没有找到该选项卡，请选择“文件”->“选项”->“自定义功能区”，然后勾选“开发工具”。

第四步：在新的模块中，编写下面的VBA代码：Function 财务大写(金额 As Variant) As StringDim 大写金额 As StringDim 数字金额 As DoubleDim 整数部分 As StringDim 小数部分 As StringDim 分号位置 As IntegerDim 节位 As IntegerDim 单位 As StringDim 数字 As IntegerDim i As IntegerDim 已分位 As BooleanDim 零位 As IntegerDim 位 As Integer如果 IsNumeric(金额) = False Then 财务大写="输入有误"Exit FunctionEnd If数字金额=金额如果数字金额 < 0 Then财务大写="负"&财务大写(-数字金额) Exit FunctionEnd If如果数字金额 = 0 Then财务大写="零元整"Exit FunctionEnd If财务大写="数值太大"Exit FunctionEnd If大写金额=""数字 = Int(n)数字金额=数字金额-数字小数部分 = Format(n * 100, "00") & "分"分号位置=0已分位 = False零位=-1Do While 数字 > 0节位=节位+1如果位 > 0 Then位 = 位 Mod 100位 = 位 Mod 10如果位 > 0 Then如果节位 >= 2 Then单位="亿"单位="万"Else单位=""End If如果位 = 1 Then LargeNum = "壹" & 单位ElseIf 位 = 2 Then LargeNum = "贰" & 单位ElseIf 位 = 3 Then LargeNum = "叁" & 单位ElseIf 位 = 4 Then LargeNum = "肆" & 单位ElseIf 位 = 5 Then LargeNum = "伍" & 单位ElseIf 位 = 6 Then LargeNum = "陆" & 单位ElseIf 位 = 7 Then LargeNum = "柒" & 单位LargeNum = "捌" & 单位ElseIf 位 = 9 ThenLargeNum = "玖" & 单位ElseIf 位 >= 10 And 位 <= 19 Then已分位 = True大写金额 = "拾" & Mid(LargeNum, 2) & 大写金额单位=""Else已分位 = True大写金额 = Mid(LargeNum, 位, 1) & 单位 & 大写金额单位=""End IfElseIf 节位 = 1 Then大写金额="零"&大写金额End If如果节位 = 2 And Val(右(Mid(大写金额, 1, 1))) = 0 Then 大写金额=大写金额&"零"End IfElseIf 已分位 = True And 零位 > 0 Then零位=零位-1大写金额 = Mid(LargeNum, 位, 1) & 单位 & 大写金额单位=""ElseIf 已分位 = False And 分号位置 > 0 Then分号位置=分号位置-1大写金额 = Mid(LargeNum, 位, 1) & 单位 & 大写金额单位=""ElseIf 单位 = "元" Then大写金额="零"&单位&大写金额单位=""零位=3已分位 = TrueElse大写金额="零"&大写金额End If数字金额=数字金额*100数字 = Int(数字金额)小数部分 = 在Excel里Format(n * 100, "00") & "分"If Asc(Right(Format(数字, "#.00"), 1)) = 0 Then小数部分=""End IfLoop大写金额="人民币"&大写金额&"元"&小数部分财务大写=大写金额End Function现在，你可以在Excel中使用“财务大写”函数公式来将数字金额转换成大写金额了。

excel表格中负数的⼈民币⾦额怎么转换成⼤写？
在财务记账中,会出现负数的⾦额。

⽽通常使⽤EXCEL单元格格式设置的⼤写⾦额⽆法满⾜要求，本经验将会提供可供负数、正数使⽤的函数公式。

1、有以下⼏个数字需要转化成⼤写⾦额，其中有负数。

2、在B1单元格输⼊公式=IF(A1=0,"","⼈民
币"&SUBSTITUTE(SUBSTITUTE(REPT("负",A1<0)&NUMBERSTRING(ABS(TRUNC(A1)),2)&SUBSTITUTE(SUBSTITUTE(TEXT(RIGHT(RMB(A1),2),"元[dbnum2]0⾓#分;;"),"零分","整"),"零⾓","零"),"零元零",""),"零元",""))
3、B1单元格显⽰出了⼤写⾦额：⼈民币负壹万贰仟玖佰玖拾叁元玖⾓壹分
4、下拉单元格填充，全部的数据都显⽰了出来。

注意事项：
公式只是对A1单元格式进⾏转化，其他单元格需要下拉或把“A1”改成其他单元格引⽤。