金额大小写转换(excell)
EXCLE小写金额转换大写公式
EXCEL 小写
金额转换大
写公式：
示例：
小写金额：大写金额：
28546.37大写（人民币）贰万捌仟伍佰肆拾陆元叁角柒说明：不讨论公式设计，单从应用方法上简单介绍，将大写金额单元格的公式复制到需要体现大写的单元格，然后对公示引用的小写单元格进行替换操作即可，比如小写金额在D5单元格，那将下述大写单元格公示中的A7全部替换成为D5即可；
公示描述："大写（人民币）"&IF((INT(A7*10)-
INT(A7)*10)=0,TEXT(INT(A7),"[DBNum2]G/通用格式")&"元
"&IF((INT(A7*100)-INT((A7)*10)*10)=0,"整","零
"&TEXT(INT(A7*100)-INT(A7*10)*10,"[DBNum2]G/通用格式")&"分"),TEXT(INT(A7),"[DBNum2]G/通用格式")&"元"&IF((INT(A7*100)-INT((A7)*10)*10)=0,TEXT((INT(A7*10)-INT(A7)*10),"[DBNum2]G/通用格式")&"角整",TEXT((INT(A7*10)-INT(A7)*10),"[DBNum2]G/通用格式")&"角"&TEXT(INT(A7*100)-INT(A7*10)*10,"[DBNum2]G/通用格式")&"分"))。
excel表格金额大小写转换
竭诚为您提供优质文档/双击可除excel表格金额大小写转换篇一：excel表中小写金额直接转换成大写金额的公式excel表中小写金额直接转换成大写金额的公式：一、=iF(oR(a1 三、用公式就可以，我不懂做会计的如何用大写表示如128.40这样的角不为0但分为0的值，是“壹佰贰拾捌元肆角整”还是“壹佰贰拾捌元肆角”？如果是“壹佰贰拾捌元肆角”，请用这个公式：=text(int(b2),"[dbnum2]"),text((int(c10*100)-int(c1 0*10)*10),"[dbnum2]")nascurrencyconstcnumasstring="零壹贰叁肆伍陆柒捌玖-万仟佰拾亿仟佰拾万仟佰拾元角分"constcchaasstring="零仟零佰零拾零零零零零亿零万零元亿万零角零分零整-零零零零零亿万元亿零整整"dimsnumasstringdimiaslongif(n0)and(abs(n)snum=trim(str(int(abs(n)*100)))Fori=1tolen(snum)逐位转换baituRmbdx=baituRmbdx+mid(cnum,(mid(snum,i,1))+1,1) +mid(cnum,26-len(snum)+i,1)nextFori=0to11去掉多余的零baituRmbdx=Replace(baituRmbdx,mid(ccha,i*2+1,2),mid (ccha,i+26,1))nextifn elsebaituRmbdx=iif(n=0,"零元","溢出")endifendFunction11Functionuppernum(n)nassingle数字大写函数ifn 正负判断="负"endifn=n+0.0001ifint(n*1000)-int(n*100)*10>4thenn=(int(n*100)+1)/100+0.001elsen=int(n*100)/100+0.001endifselectcasencaseis>9999999999999.99uppernum="数据不符"msgbox"金额不能大于9999999999999.99！",vbokonly,"出错提示"caseelseconstcnum="零壹贰叁肆伍陆柒捌玖-万仟佰拾亿仟佰拾万仟佰拾元角分"constccha="零仟零佰零拾零零零零零亿零万零元亿万零角零分零整-零零零零零亿万元亿零整整"uppernum=""snum=""s=trim(str(n))Fori=1tolen(s)-1ifmid(s,i,1)"."thensnum=snum+mid(s,i,1)Fori=1tolen(snum)逐位转换uppernum=uppernum+mid(cnum,(mid(snum,i,1))+1,1)+mid (cnum,26-len(snum)+i,1)nextiFori=0to11去掉多余的零uppernum=Replace(uppernum,mid(ccha,i*2+1,2),mid(cch a,i+26,1))nextiendselectif正负判断="负"thenuppernum="负"&uppernumendFunction12Functionjezh(xasRange)ifx>=1thenifint(x)=xorRound(x,2)=int(x)thenjezh=application.worksheetFunction.text(int(x),"[db num2]")&"元"elseifint(x*10)=x*10orint(x*10)=Round(x,2)*10then。
Excel中金额大小写转换(四舍五入都OK)
Excel中金额大小写转换编制工程造价很有用编制EXCEL财务表也很有用Excel中金额大小写转换函数[=ntoc(单元格)]一、使用加载宏方法：对于有四舍五入都没问题啊“工具栏”→“宏”→“Visual Basic编辑器”，在“Visual Basic编辑器”中顶部选“插入”→“模块”，在“模块”对话框中选“通用”，并在编辑区域内粘贴以下内容：Function NtoC(n) 'n as singleConst cNum = "零壹贰叁肆伍陆柒捌玖-万仟佰拾亿仟佰拾万仟佰拾元角分"Const cCha = "零仟零佰零拾零零零零零亿零万零元亿万零角零分零整-零零零零零亿万元亿零整整"NtoC = ""n = Round(n, 2)sNum = Trim(Str(Int(n * 100)))For i = 1 To Len(sNum) '逐位转换NtoC = NtoC + Mid(cNum, (Mid(sNum, i, 1)) + 1, 1) + Mid(cNum, 26 - Len(sNum) + i, 1)NextFor i = 0 To 11 '去掉多余的零NtoC = Replace(NtoC, Mid(cCha, i * 2 + 1, 2), Mid(cCha, i + 26, 1))NextEnd Function然后单击“保存”，关闭“Visual Basic编辑器”，回到“工作表１”，输入函数“=NtoC(单元格)”即可。
例如在单元格A1输入：A1=222, 在单元格A2输入：A2=NTOC(A1) 即可，这样A1单元格输入的数变化，A2单元格的大写自动变化。
A2单元格最好进行单元锁定。
EXCEL中输入金额小写如何变成大写【会计实务经验之谈】
从业二十年的老会计经验之谈，如果觉得有帮助请您打赏支持，谢谢!EXCEL中输入金额小写如何变成大写【会计实务经验之谈】【问题】在F4单元格中输入1824.25，怎样在F5中出现壹仟捌佰贰拾肆元贰角伍分？【解答】把下面公式COPY到你要放大写的单元格位置，公式里的F4是输入小写数字的单元格位置，如果你的小写数字在其他单元格，就用替换功能换一下就可以了。
=IF(F4<1‚IF(F4<0.1‚TEXT(INT(F4*100)‚”[DBNum2]G/通用格式”)&”分”‚IF((INT(F4*100)-INT(F4*10)*10=0)‚TEXT(INT(F4*10)‚”[DBNum2]G/通用格式”)&”角整”‚TEXT(INT(F4*10)‚”[DBNum2]G/通用格式”)&”角”&TEXT(INT(F4*100)-INT(F4*10)*10‚”[DBNum2]G/通用格式”)&”分”))‚TEXT(INT(F4)‚”[DBNum2]G/通用格式”&”元”)&am p;IF((INT(F4*10)-INT(F4)*10)=0‚IF((INT(F4*100)-INT(F4*10)*10)=0‚”“‚”零”)‚IF((INT(F4*0.1)-INT(F4)*0.1)=0‚”零”‚”“)&TEXT(INT(F4*10)-INT(F4)*10‚”[DBNum2]G/通用格式”)&”角”)&IF((INT(F4*100)-INT(F4*10)*10)=0‚”整”‚TEXT(INT(F4*100)-INT(F4*10)*10‚”[DBNum2]G/通用格式”)&”分”))小编寄语：不要指望一张证书就能使你走向人生巅峰。
大小写金额转换(Excel公式计算)
大写金额:(人民币)叁元柒角捌分 大写金额:(人民币)肆元陆角伍分 大写金额:(人民币) 大写金额:(人民币) 大写金额:(人民币) 大写金额:(人民币)叁佰贰拾伍元整 大写金额:(人民币)玖佰柒拾捌元整 大写金额:(人民币)贰拾元整 大写金额:(人民币)壹佰元整 大写金额:(人民币)壹万元整 大写金额:(人民币)壹元整 大写金额:(人民币)壹拾元整 大写金额:(人民币)壹仟元整 大写金额:(人民币)壹万元整 大写金额:(人民币)壹拾万元整 大写金额:(人民币)壹佰万元整 大写金额:(人民币)壹仟万元整 大写金额:(人民币)壹亿元整 大写金额:(人民币)壹拾亿元整 大写金额:(人民币)壹佰亿元整 大写金额:(人民币)壹仟亿元整 大写金额:(人民币)壹兆元整 大写金额:(人民币)壹拾兆元整 大写金额:(人民币)壹零零零零零零兆元整
0
大写金额:(人民币)负玖角玖分
0 玖分
#REF!
金额 ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ ￥ -0.99 1.25 1.05 0.90 3.25 4.68 -0.50 99.00 3.05 4.08 0.01 1.00 0.10 1.02 0.20 375.00 325.00 99,999,999,999,999.00 0.01 -0.01 325.00 9,786.59 0.99 -0.99 1.99 -1.99 0.25 0.20
大写 大写金额:(人民币)负玖角玖分 大写金额:(人民币)壹元贰角伍分 大写金额:(人民币)壹元零伍分 大写金额:(人民币)玖角整 大写金额:(人民币)叁元贰角伍分 大写金额:(人民币)肆元陆角捌分 大写金额:(人民币)负伍角整 大写金额:(人民币)玖拾玖元整 大写金额:(人民币)叁元零伍分 大写金额:(人民币)肆元零捌分 大写金额:(人民币)壹分 大写金额:(人民币)壹元整 大写金额:(人民币)壹角整 大写金额:(人民币)壹元零贰分 大写金额:(人民币)贰角整 大写金额:(人民币)叁佰柒拾伍元整 大写金额:(人民币)叁佰贰拾伍元整 大写金额:(人民币)玖拾玖兆玖仟玖佰玖拾玖亿玖仟玖佰玖拾玖万玖仟玖佰玖拾玖元整 大写金额:(人民币)壹分 大写金额:(人民币)负壹分 大写金额:(人民币)叁佰贰拾伍元整 大写金额:(人民币)玖仟柒佰捌拾陆元伍角玖分 大写金额:(人民币)玖角玖分 大写金额:(人民币)负玖角玖分 大写金额:(人民币)壹元玖角玖分 大写金额:(人民币)负壹元玖角玖分 大写金额:(人民币)贰角伍分 大写金额:(人民币)贰角整
Excel转换人民币大小写的方法
Excel转换人民币大小写的方法
大家知道Excel转换人民币大小写吗?下面我们就给大家详细介绍一下吧!我们积累了一些经验，在此拿出来与大家分享下，请大家互相指正。
一、在三个连续的同行单元格中转换
1. B2中输入公式=IF(B12. C2中输入=IF(B13. D2中输入=IF(B1这样在连续的三个同行单元格中实现了大写金额格式的转换。
为了使转换符合财务格式，B2应右对齐，C2列宽无间隔，且不设左右边框线，D2要左对齐。
二、用Excel提供的函数转换
个位为0，则不显示;不为0，显示XXX元”;不为0、且角位和分位均为0，显示XXX元整”;元角分位均为0，则显示零元整”。
小数点后面第一位为0、且元位或分位有一为0，则不显示;为0、且元位和分位均不为0，则显示零”;不为0，显示X角”。
小数点后面第二位为0，则显示整”;不为0，显示X分”。
根据以上思路在B2中输入公式：
IF(B1IF(B1IF(INT(B1)??(INT(B1??100)-INT(B1??10)??10)=0，”“，” 零”)，。
Excel金额大小写转换及保留2位小数的函数公式
一、金额大小写转换假设数据源在单元格G5，目标单元格是D1，在D1单元格输入如下公式：=SUBSTITUTE(SUBSTITUTE(IF(G5>-0.5%,,"负")&TEXT(INT(ABS(G5)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(FIXED(G5),2),"[dbnum2]0角0分;;"&IF(ABS(G5)>1%,"整",)),"零角",IF(ABS(G5)<1,,"零")),"零分","整")其实用下面这个就可以了，依我看上面公式中的&IF(ABS(G5)>1%,"整",)是多余的！=SUBSTITUTE(SUBSTITUTE(IF(G5>-0.5%,,"负")&TEXT(INT(ABS(G5)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(FIXED(G5),2),"[dbnum2]0角0分;;"),"零角",IF(ABS(G5)<1,,"零")),"零分","整")1、这个公式中用了SUBSTITUTE（）、IF（）、TEXT（）、INT （）、ABS（）、RIGHT（）、FIXED（）七个函数，其中TEXT（）函数的两次使用都是运用了高级应用，这也是本公式最难看懂的地方，另个为了符合人民币的读数规则；两次使用了SUBSTITUTE（）对出现不符合读数规定的字符用有效字符替换，这一点也很重要。
2、本题的基本思路是：一是用IF函数判断需要转换数据的正、负（如果是正数就不用在数值前显示“正”，负则必须显示“负”字）；二是用ABS函数对数据源数值进行求绝对值，然后用IND函数对这个绝对值截取整数部分的数值，再把整数部分的数值交由TEXT函数转换成中文大写；三是对小数部分的数值处理，通过用FIXED函数对源数据进行四舍五入保留2位有效数字并用文本显示，然后用RIGHT 函数将显示的文本从右边截取两位数值（即保留的小数位数据），再把这两位数交由TEXT函数转换成中文大写；四是人民币大写最后有个“整”字也补上。
Excel表中小写金额直接转换成大写金额的公式
Excel表中小写金额直接转换成大写金额的公式：一、=IF(OR(A1<0,A1=""),"",IF(VALUE(LEFT(A1,1))=0,"",NUMBERSTRIN G(INT(A1),2)&"元")&IF(ISERROR(FIND(".",A1)),"整",IF(VALUE(MID(A1,FIND(".",A1)+1,1))=0,"零",IF(ISERROR(FIND(".",A1)),"",NUMBERSTRING(MID(A1,FIND(".", A1)+1,1),2)&"角")))&IF(ISERROR(FIND(".",A1)),"",IF(LEN(ROUND(A1,2))=(FIND( ".",A1)+2),NUMBERSTRING(MID(ROUND(A1,2),FIND(".",A1)+2,1),2 )&"分","")))&IF(ISERROR(FIND(".",A1)),"","")二、假定你要在B1输入阿拉佰数字,C1转换成中文大写金额(含元角分),请在C1单元格输入如下公式:=SUBSTITUTE(SUBSTITUTE(IF(-RMB(B1),IF(B1>0,,"负")&TEXT(INT(ABS(B1)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(B1,2),2),"[dbnum2]0角0分;;整"),),"零角",IF(B1^2<1,,"零")),"零分","整")三、用公式就可以，我不懂做会计的如何用大写表示如128.40这样的角不为0但分为0的值，是“壹佰贰拾捌元肆角整”还是“壹佰贰拾捌元肆角”？如果是“壹佰贰拾捌元肆角”，请用这个公式：=TEXT(INT(B2),"[DBNUM2]")&"元"&IF(INT(B2)=B2,"整",(IF(INT(B2*10)-INT(B2)*10>0,TEXT(INT(B2*10)-INT(B2)*10,"[ DBNUM2]")&"角","零")&IF(B2*100-INT(B2*10)*10>0,TEXT(B2*100-INT(B2*10)*10,"[db num2]")&"分","")))如果是“壹佰贰拾捌元肆角整”，请用这个公式：=TEXT(INT(B2),"[DBNUM2]")&"元"&(IF(INT(B2*10)-INT(B2)*10>0,TEXT(INT(B2*10)-INT(B2)*10,"[ DBNUM2]")&"角",IF(B2*100-INT(B2*10)*10>0,"零",""))&IF(B2*100-INT(B2*10)*10>0,TEXT(B2*100-INT(B2*10)*10, "[dbnum2]")&"分","整"))说明：1、将以上公式中的B2换成你要换算的值或对应的单元格。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
输入列显示列
1222235.62壹佰贰拾贰万贰仟贰佰叁拾伍元陆角贰分
2345.22贰仟叁佰肆拾伍元贰角贰分
1256.76壹仟贰佰伍拾陆元柒角陆分
2000.1贰仟元壹角整
2134568.43贰佰壹拾叁万肆仟伍佰陆拾捌元肆角叁分
12134568.43壹仟贰佰壹拾叁万肆仟伍佰陆拾捌元肆角叁分
112134568.4壹亿壹仟贰佰壹拾叁万肆仟伍佰陆拾捌元肆角叁分2134568.43贰佰壹拾叁万肆仟伍佰陆拾捌元肆角叁分
211238968.4贰亿壹仟壹佰贰拾叁万捌仟玖佰陆拾捌元肆角叁分265898.43贰拾陆万伍仟捌佰玖拾捌元肆角叁分
21345568.32贰仟壹佰叁拾肆万伍仟伍佰陆拾捌元叁角贰分
2134568.42贰佰壹拾叁万肆仟伍佰陆拾捌元肆角贰分。