大写转换_大写金额转换

2020-02-28 其他范文 下载本文

大写转换由刀豆文库小编整理,希望给你工作、学习、生活带来方便,猜你可能喜欢“大写金额转换”。

大写转换函数

对于财务和会计领域的朋友们来说,在excel在录入数据后,将数字自动转换为人民币大写是每天都要做的工作之一。由于使用的频繁和简便,IT部落窝小编今天专门写下这篇文章分享给大家。

Excel中也提供了将数字转成人民币大写的功能,就是使用“设置单元格格式--数字--特殊--中文大写数字”。比如:589.3转人民币大写后就是:伍佰捌拾玖.叁。只要用过的朋友们都知道使用excel的内置功能,将数字转人民币大写,转出来的结果还是不符合人民币的说明习惯,所以我们一般不会采用这种方法。

工具/原料

excle

步骤/方法

第一种方法:通过函数嵌套实现

数字转人民币大写形式的公式是:

=IF(B1

(IF(OR(B1=0,B1=“”),“(人民币)零元”,IF(B1

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]”)&“分”)

数字转人民币大写形式的公式是:

=“大写金额:”&IF(TRIM(B1)=“”,“”,IF(B1=0,“”,“人民币”&IF(B1

第二种方法:通过宏VBA自定义函数实现第一步:按下ALT+F11组合键,或者是单击工具——宏——Visual Basic编辑器,进入Visual Basic编程环境,单击“插入” 菜单——模块,复制下面代码,保存,退出关闭。Function N2RMB(M)

y = Int(Round(100 * Abs(M))/ 100)

j = Round(100 * Abs(M)+ 0.00001)Int(j / 10))* 10

A = IIf(y

b = IIf(j > 9.5, Application.Text(Int(j / 10), “[DBNum2]”)& “角”, IIf(y 1, “零”, “”)))

c = IIf(f

N2RMB = IIf(Abs(M)

End Function

第二步:返回excel操作界面,在B1单元格输入:= N2RMB(A1),就可以将A1单元格的数字转为人民币大写,然后向下复制公式即可将全部的数字转为人民币大写。

excel中数字转换英文大写程序

Function NumbToEnglish(ByVal MyNumber)Dim TempDim Inte, DecDim DecimalPlace, Count ReDim Place(9) As StringPlace(2) = " Thousand "Place(3) = " Million "Plac......

大写的人

大写的人——观《杨善洲》有感王秀丽2012/3/20大写的人——观《杨善洲》有感今日观看《2011感动中国颁奖典礼》,其中已逝的杨善洲老先生给我带来了极大的震撼和思索。杨善洲......

110大写

壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰、仟、万、亿、元(圆)、角、分、零、整。这是大家经常要填写的大写数字,问什么要用大写数字呢?想必很多人都不是很清楚!先看看以下......

数字大写

数字:零、壹、贰、叁、肆、伍、陆、柒、捌、玖 数量单位:拾、佰、仟、万、亿金额单位:元(圆)、角、分、零、整(原则上角后不写“整”)......

汉语拼音大写发音

汉语拼音大写发音......

《大写转换.docx》
将本文的Word文档下载,方便收藏和打印
推荐度:
大写转换
点击下载文档
相关专题 大写金额转换 大写金额转换
[其他范文]相关推荐
[其他范文]热门文章
下载全文