本文目录一览

1，excel金额大小写自动转换

=IF(M13<0,"金额为负无效",IF((M13=0),"零元整",IF(M13<1,"",TEXT(INT(M13),"[dbnum2]G/通用格式"&"元")&IF(INT(M13*10)-INT(M13)*10=0,"",""))&IF(AND((INT(M13*100)-INT(M13*10)*10)<>0,(INT(M13*10)-INT(M13)*10)=0),"零",IF((INT(M13*10)-INT(M13)*10)=0,"",TEXT(INT(M13*10)-INT(M13)*10,"[dbnum2]G/通用格式"&"角")))&IF((INT(M13*100)-INT(M13*10)*10)=0,"整",TEXT(INT(M13*100)-INT(M13*10)*10,"[dbnum2]G/通用格式"&"分")))) 参照上述公式吧，上面的公式是把M13单元格的金额自动转换为人民币大写金额！

excel金额大小写自动转换

2，大小写金额转换

int a =金额int b2 (百分位)，b1 (十分位)，b0 (个位)b2=a/100 ("/"运算是取整)b1=a%100 ( %运算是取余)c1=b1%10 (这样就取得了个位)b1=b1/10 (最后取得十位数字)就这种思路当然你format转化为string然后按位读取也是可以的
=substitute(substitute(if(r17<0,"负","")& text(trunc(abs(round(r17,2))),"[dbnum2][$-804]g/通用格式")&" 元"&if(iserr(find(".",round(r17,2))),"",text(right(trunc(round(r17,2)*10))," [dbnum2][$-804]g/通用格式"))&if(iserr(find(".0",text(r17,"0.00")))," 角","")&if(left(right(round(r17,2),3))=".",text(right(round(r17,2))," [dbnum2][$-804]g/通用格式")&"分",if(round(r17,2)=0,"","整")),"零元零",""),"零元","")把公式里的[dbnum2]都替换为[dbnum2][$-804]g/通用格式就可以了。
需要汉字的话再建一个枚举 如果不嫌麻烦定义一个方法比如 public string GetCNum(int a) string b; switch(a) case 0 : b ="零"。。 。 default : b=""; } return b; } 输出的时候调用这个方法将数字转汉字就行了 知道居然没法修改回答，还得开马甲郁闷

大小写金额转换

3，金额大小写转换的问题

第一种数字转人民币大写形式的公式是：=IF(B1<0,"金额为负无效",(IF(OR(B1=0,B1=""),"(人民币)零元",IF(B1<1,"(人民币)",TEXT(INT(B1),"[dbnum2](人民币)G/通用格式")&"元"))))&IF((INT(B1*10)-INT(B1)*10)=0,IF(INT(B1*100)-INT(B1*10)*10=0,"","零"),(TEXT(INT(B1*10)-INT(B1)*10,"[dbnum2]")&"角"))&IF((INT(B1*100)-INT(B1*10)*10)=0,"整",TEXT((INT(B1*100)-INT(B1*10)*10),"[dbnum2]")&"分")也可以通过宏VBA自定义函数实现。答案转自IT部落窝(ittribalwo.com)网站。
第一种数字转人民币大写形式的公式是：=IF(B1<0,"金额为负无效",(IF(OR(B1=0,B1=""),"(人民币)零元",IF(B1<1,"(人民币)",TEXT(INT(B1),"[dbnum2](人民币)G/通用格式")&"元"))))&IF((INT(B1*10)-INT(B1)*10)=0,IF(INT(B1*100)-INT(B1*10)*10=0,"","零"),(TEXT(INT(B1*10)-INT(B1)*10,"[dbnum2]")&"角"))&IF((INT(B1*100)-INT(B1*10)*10)=0,"整",TEXT((INT(B1*100)-INT(B1*10)*10),"[dbnum2]")&"分")也可以通过宏VBA自定义函数实现。答案转自IT部落窝(ittribalwo.com)网站。

金额大小写转换的问题

4，excel表格里的小写金额怎么换成大写金额

1.假设要转换的数字小写金额在A列，如图所示：2.选中要转换的数字所在的单元格区域，按下CTRL+1组合快捷键，弹出设置单元格格式对话框，如下图所示。3.在“数字”选项卡下单击“特殊”选择“中文大写数字”，然后单击“确定”按钮如下图所示。4.以上是通过设置单元格式的方式将数字转换为大写数字，但是并没有严格按照财务对大小写金额的转换要求。如果要严格按照财务对大小写金额转换的要求来说，可以在B2单元格输入公式=SUBSTITUTE(SUBSTITUTE(TEXT(INT(A2),"[DBNum2][$-804]G/通用格式元"&IF(INT(A2)=A2,"整",""))&TEXT(MID(A2,FIND(".",A2&".0")+1,1),"[DBNum2][$-804]G/通用格式角")&TEXT(MID(A2,FIND(".",A2&".0")+2,1),"[DBNum2][$-804]G/通用格式分"),"零角","零"),"零分","")5.然后按住鼠标左键拖动B2单元格右下角的填充柄到B列的其它单元格区域，即可。如下图所示：6.通过以上两种方法基本可以满足各种金额大小写转换的要求了。
用WPS吧，wps的单元格格式里有人民币大小写的格式。如果是ms的office，要用很长的公式才能解决。
设置大写数字：　先在大写单元格里输入“=小写合计金额（指定单元格）”。然后选中大写行，右键-设置单元格格式-数字-特殊-类型-中文大写数字-确定。 设置大写金额　在输入大写金额的单元格输入下面公式=TEXT(INT(A1),"[dbnum2]")&IF(INT(A1)=A1,"元整","元")&IF(ISERROR(FIND(".",A1))=TRUE,"",IF(LEN(A1)-FIND(".",A1)=1,TEXT(RIGHT(A1,1),"[dbnum2]")&"角",IF(AND(LEN(A1)-FIND(".",A1)=2,MID(A1,LEN(A1)-1,1)<>"0"),TEXT(MID(A1,LEN(A1)-1,1),"[dbnum2]")&"角"&TEXT(RIGHT(A1,1),"[dbnum2]")&"分","零"&TEXT(RIGHT(A1,1),"[dbnum2]")&"分"))) A1指你小写金额所在的单元格
=SUBSTITUTE(SUBSTITUTE(IF(A1>-0.5%,,"负")&TEXT(INT(FIXED(ABS(A1))),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(FIXED(A1),2),"[dbnum2]0角0分;;"&IF(ABS(A1)>1%,"整",)),"零角",IF(ABS(A1)<1,,"零")),"零分","整")将公式里的A1改为实际相应的单元格即可。
给你编个公式吧=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)),"[DBNum2]")&"分","整")其中"A2"是数字格,即需要转换为大写的那格。

文章TAG：大小  金额  转换  excel  大小写金额转换  
下一篇