当前位置：文档之家 › 怎样在EXCEL中数字转人民币大写

怎样在EXCEL中数字转人民币大写

  • 格式：doc
  • 大小：279.50 KB
  • 文档页数：7

怎样在EXCEL中数字转人民币大写1.第一种方法：通过函数嵌套实现数字转人民币大写形式的公式是：=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]")&"分")数字转人民币大写形式的公式是：="大写金额："&IF(TRIM(B1)="","",IF(B1=0,"","人民币"&IF(B1<0,"负",)&IF(INT(B1),TEXT(INT(ABS(B1)),"[dbnum2]")&"元",)&IF(INT(ABS(B1)*10)-INT(ABS(B1))*10,TEXT(INT(ABS(B1)*10)-INT(ABS(B 1))*10,"[dbnum2]")&"角",IF(INT(ABS(B1))=ABS(B1),,IF(ABS(B1)<0.1,,"零")))&IF(ROUND(ABS(B1)*100-INT(ABS(B1)*10)*10,),TEXT(ROUND(ABS(B1)*100 -INT(ABS(B1)*10)*10,),"[dbnum2]")&"分","整")))12508.34 大写金额：壹万贰仟伍佰零捌元叁角肆分数字转人民币大写形式的公式是：="大写金额："&IF(TRIM(B1)="","",IF(B1=0,"",""&IF(B1<0,"负",)&IF(INT(B1),TEXT(INT(ABS(B1)),"[dbnum2]")&"元",)&IF(INT(ABS(B1)*10)-INT(ABS(B1))*10,TEXT(INT(ABS(B1)*10)-INT(ABS(B 1))*10,"[dbnum2]")&"角",IF(INT(ABS(B1))=ABS(B1),,IF(ABS(B1)<0.1,,"零")))&IF(ROUND(ABS(B1)*100-INT(ABS(B1)*10)*10,),TEXT(ROUND(ABS(B1)*100 -INT(ABS(B1)*10)*10,),"[dbnum2]")&"分","整")))这类转换的格式没有“人民币”字样1.第二种方法：通过宏VBA自定义函数实现第一步：按下ALT+F11组合键，或者是单击工具——宏——Visual Basic 编辑器，进入Visual Basic编程环境，单击“插入” 菜单——模块，复制下面代码，保存，退出关闭。

Function N2RMB(M)y = Int(Round(100 * Abs(M)) / 100)j = Round(100 * Abs(M) + 0.00001) - y * 100f = (j / 10 - Int(j / 10)) * 10A = IIf(y < 1, "", Application.Text(y, "[DBNum2]") & "元")b = IIf(j > 9.5, Application.Text(Int(j / 10), "[DBNum2]") & "角", IIf(y < 1, "", IIf(f > 1, "零", "")))c = IIf(f < 1, "整", Application.Text(Round(f, 0), "[DBNum2]") &"分")N2RMB = IIf(Abs(M) < 0.005, "", IIf(M < 0, "负" & A & b & c, A &b & c))End Function第二步：返回excel操作界面，在B1单元格输入：= N2RMB (A1)，就可以将A1单元格的数字转为人民币大写，然后向下复制公式即可将全部的数字转为人民币大写。

要将人民币小写金额转换成大写格式，用Excel提供的格式，将自定义格式类型中的“[dbnu m2]G/通用格式”改为“[dbnum2] G/通用格式“元””来实现。

但在转换小数时却出现了问题，比如￥6,050.09只能转换为“陆仟零伍拾.零玖圆”。

那么用Excel能不能解决这一先天不足呢？其方法有以下两种(以下均对B1转换，假设B1是通过函数ROUND( )四舍五入取得二位小数的小写金额数，其值为￥6,050.09)。

步骤/方法1.一、在三个连续的同行单元格中转换1. B2中输入公式“=IF(B1<0，"金额为负无效"，INT(B1))”，计算结果为￥6,050.00，然后点击“格式→单元格→数字→特殊→中文大写数字→确定”，B2显示“陆仟零伍拾”，再点击“格式→单元格→数字→自定义”，将“类型”编辑框中的“[dbnum2]G/通用格式”修改为：[dbnum2](“人民币”)G/通用格式“元”，此时B2显示：“(人民币)陆仟零伍拾元”。

2. C2中输入“=IF(B1<0，""，INT(B110)-INT(B1)10)”，同样C2改为：[DBNum2]G/通用格式“角”，C2显示：“零角”。

3. D2中输入“=IF(B1<0，""，INT(B1100)-INT(B110)10)”，同样D2改为：[DBNum2]G/通用格式“分”， D2显示：“玖分”。

这样在连续的三个同行单元格中实现了大写金额格式的转换，如图1所示。

为了使转换符合财务格式，B2应右对齐，C2列宽无间隔，且不设左右边框线，D2要左对齐。

2.二、用Excel提供的函数转换个位为0，则不显示；不为0，显示“XXX元”；不为0、且角位和分位均为0，显示“XXX元整”；元角分位均为0，则显示“零元整”。

小数点后面第一位为0、且元位或分位有一为0，则不显示；为0、且元位和分位均不为0，则显示“零”；不为0，显示“X角”。

小数点后面第二位为0，则显示“整”；不为0，显示“X分”。

根据以上思路在B2中输入公式：“IF(B1<0，"金额为负无效"，IF(OR(B1=0，B1="")，"(人民币)零元整"))；IF(B1<1，"(人民币)"，TEXT(INT(B1)，"[dbnum2](人民币)G/通用格式")&&"元")&&IF(INT(B110)-INT(B1)10=0)；IF(INT(B1)(INT(B1100)-INT(B110)10)=0，""，"零")，TEXT(INT(B110)-INT(B1)10，"[dbnum2]")&&"角")&&IF((INT(B1 100)-INT(B110)10)=0，"整"，TEXT((INT(B1100)-INT(B1*10)*10)，"[dbnum2]")&&"分")))”。

确认后B2显示：“(人民币)陆仟零伍拾元零玖分”。

以后使用时将公式复制到有关单元格中，若转换的对象B1发生了变化，可点击“编辑→替换”将B1替换掉。

两种转换测试结果如图2所示。

要将人民币小写金额转换成大写格式，用Excel提供的格式，将自定义格式类型中的“[dbnum2]G/通用格式”改为“[dbnum2] G/通用格式“元””来实现。

但在转换小数时却出现了问题，比如￥6,050.09只能转换为“陆仟零伍拾.零玖圆”。

那么用Excel能不能解决这一先天不足呢？其方法有以下两种（以下均对B1转换，假设B1是通过函数ROUND( )四舍五入取得二位小数的小写金额数，其值为￥6,050.09）。

步骤/方法1.一、在三个连续的同行单元格中转换1. B2中输入公式“=IF(B1<0，"金额为负无效"，INT(B1))”，计算结果为￥6,050.00，然后点击“格式→单元格→数字→特殊→中文大写数字→确定”，B2显示“陆仟零伍拾”，再点击“格式→单元格→数字→自定义”，将“类型”编辑框中的“[dbnum2]G/通用格式”修改为：[dbnum2](“人民币”)G/通用格式“元”，此时B2显示：“(人民币)陆仟零伍拾元”。

2. C2中输入“=IF(B1<0，""，INT(B1?10)-INT(B1)?10)”，同样C2改为：[DBNum2]G/通用格式“角”，C2显示：“零角”。

合集下载

怎样在EXCEL中数字转人民币大写

怎样在EXCEL中数字转人民币大写

怎样在EXCEL中数字转人民币大写1.第一种方法：通过函数嵌套实现数字转人民币大写形式的公式是：=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]")&"分")数字转人民币大写形式的公式是：="大写金额："&IF(TRIM(B1)="","",IF(B1=0,"","人民币"&IF(B1<0,"负",)&IF(INT(B1),TEXT(INT(ABS(B1)),"[dbnum2]")&"元",)&IF(INT(ABS(B1)*10)-INT(ABS(B1))*10,TEXT(INT(ABS(B1)*10)-INT(ABS(B 1))*10,"[dbnum2]")&"角",IF(INT(ABS(B1))=ABS(B1),,IF(ABS(B1)<0.1,,"零")))&IF(ROUND(ABS(B1)*100-INT(ABS(B1)*10)*10,),TEXT(ROUND(ABS(B1)*100 -INT(ABS(B1)*10)*10,),"[dbnum2]")&"分","整")))12508.34 大写金额：壹万贰仟伍佰零捌元叁角肆分数字转人民币大写形式的公式是：="大写金额："&IF(TRIM(B1)="","",IF(B1=0,"",""&IF(B1<0,"负",)&IF(INT(B1),TEXT(INT(ABS(B1)),"[dbnum2]")&"元",)&IF(INT(ABS(B1)*10)-INT(ABS(B1))*10,TEXT(INT(ABS(B1)*10)-INT(ABS(B 1))*10,"[dbnum2]")&"角",IF(INT(ABS(B1))=ABS(B1),,IF(ABS(B1)<0.1,,"零")))&IF(ROUND(ABS(B1)*100-INT(ABS(B1)*10)*10,),TEXT(ROUND(ABS(B1)*100 -INT(ABS(B1)*10)*10,),"[dbnum2]")&"分","整")))这类转换的格式没有“人民币”字样1.第二种方法：通过宏VBA自定义函数实现第一步：按下ALT+F11组合键，或者是单击工具——宏——Visual Basic 编辑器，进入Visual Basic编程环境，单击“插入” 菜单——模块，复制下面代码，保存，退出关闭。

excel 函数 阿拉伯数字转中文

excel 函数 阿拉伯数字转中文

excel 函数阿拉伯数字转中文
在Excel中，我们经常需要将阿拉伯数字转换为中文，以便更好地呈现和理解数据。

幸运的是，Excel 提供了一些内置函数来实现这一目的。

1. 数字转中文大写函数：
在 Excel 中，我们可以使用 VBA 函数将阿拉伯数字转换为中文大写。

这个函数可以将任何数字转换为中文大写，例如将数字 123 转换为“一百二十三”。

下面是一个示例：
```=CHINESE(123)```
2. 货币转中文大写函数：
如果你想将货币金额转换为中文大写，那么你可以使用以下函数： ```=CHINESE(123,'[DbNum2]')```
这个函数可以将任何金额转换为中文大写，例如将￥123 转换
为“壹佰贰拾叁元整”。

3. 日期转中文函数：
如果你想将日期转换为中文，那么你可以使用以下函数：
```=TEXT(A1,'[$-zh-CN]yyyy年mm月dd日')```
这个函数可以将任何日期转换为中文，例如将 2021/8/1 转换为“2021年8月1日”。

总之，通过使用这些函数，你可以很容易地将阿拉伯数字转换为中文，在数据分析和报告制作中更加得心应手。

在Excel中实现人民币大写显示的三种方法

在Excel中实现人民币大写显示的三种方法

在Excel中实现人民币大写显示的三种方法
张唏
【期刊名称】《中国会计电算化》
【年(卷),期】2000()1
【摘要】Excel97内置函数法方法1 在Excel97中有这样一个功能,利用单元格格式中的设置可以将一个小写的阿拉伯数值转换成一个大写中文数值,但不能按财务金额的格式显示。

其实,对于一个金额来讲,如5.34元(五元三角四分),可将5.34中的5、3、4分别分离,然后在每个数值中间加入元、角、分,最后将数值用大写中文数值表示即可。

【总页数】2页(P51-52)
【作者】张唏
【作者单位】
【正文语种】中文
【中图分类】F233;TP317
【相关文献】
1.在VFP中实现奖金核算功能之难点——报表中如何将人民币数额小写转换为大写 [J], 何建生;王建军
2.在VFP中实现奖金核算功能之难点——报表中如何将人民币数额小写转换为大写 [J], 何建生;王建军
3.Excel中人民币小写金额转换大写技巧三则 [J], 张丕南
4.Excel 中实现中文大写数字的几种方法 [J], 张山风
5.运用ExcelVBA将人民币金额小写格式转换成大写格式 [J], 陈国栋
因版权原因，仅展示原文概要，查看原文内容请购买。

Excel也可以实现对数字的大写转换及读写！

Excel也可以实现对数字的大写转换及读写！

Excel也可以实现对数字的⼤写转换及读写！ Excel中数字⼤写，应⽤的⾮常普遍，尤其是财会⼈员，显得更为重要，但是你真的会对其进⾏设置吗？⼀、单元格格式法。

⽅法：1、选中⽬标单元格。

2、快捷键Ctrl+1打开【设置单元格格式】对话框。

3、选择【分类】-【特殊】-【中⽂⼤写数字】并【确定】。

解读：1、此⽅法的应⽤⾮常的普遍，也较为简单。

可以先录⼊数值然后进⾏转换，也可以先对单元格格式进⾏设置，然后输⼊，达到的效果都是⼀样哦！2、对数字进⾏直接转换，不进⾏四舍五⼊操作。

⼆、函数公式法。

（⼀）、NumberString函数法。

1、功能：对给定的数字根据指定的类型转换为⼤写形式。

2、语法结构：=NumberString(数值或引⽤，转换类型)。

其中转换类型有：1、2、3三种，其中1为“汉字⼩写”、2为“汉字⼤写”、3为“汉字读写”。

⽅法：在⽬标单元格中输⼊公式：=NUMBERSTRING(D3,1)、=NUMBERSTRING(D3,2)、=NUMBERSTRING(D3,3)。

解读：1、Numberstring函数为系统隐藏函数，在系统中是⽆法查询到相关说明的哦，⼤家只需要掌握其语法结构和代码1、2、3代表的意义即可哦！2、从转换的结构中可以得出，Numberstirng函数在转换为指定的类型时是按照“四舍五⼊”的⽅式进⾏的。

例如：66.98的转换结果为：六⼗七、陆拾柒、六七。

所以⼤家要注意哦！（⼆）公式法。

⽅法：在⽬标单元格中输⼊公式：=TEXT(LEFT(RMB(D3),LEN(RMB(D3))-3),'[dbnum2]G/通⽤格式元;负[dbnum2]G/通⽤格式元; ;')&TEXT(RIGHT(RMB(D3),2),'[dbnum2]0⾓0分;;整')。

解读：此公式⽐较复杂，⼤家在使⽤的时候只需要复制即可哦，但需要注意将公式中的参数做对应的修改。

具体请看下图。