大写数字转换excel表格中的大写数字后面带小数点怎么转换中文大写

大写数字转换  时间:2021-01-12  阅读:()

数字大写转换器123569.069

壹拾贰万叁仟伍佰陆拾玖圆零柒分 大写金额数字应用正楷或行书填写,如壹(壹)、贰(贰)、叁、肆(肆)、伍(伍)、陆(陆)、柒、捌、玖、拾、佰、仟、万(万)、亿、元、角、分、零、整(正)等字样。

不得用一、二(两)、三、四、五、六、七、八、九、十、念、毛、另(或0)填写,不得自造简化字。

阿拉伯数字如何转换成大写的呢?

=IF(待转换数字或单元格<0,"负","")&IF(TRUNC(ROUND(待转换数字或单元格,2))=0,"",TEXT(TRUNC(ABS(ROUND(待转换数字或单元格,2))),"[DBNum2]")&"点")&IF(ISERR(FIND(".",ROUND(待转换数字或单元格,2))),"",TEXT(RIGHT(TRUNC(ROUND(待转换数字或单元格,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(待转换数字或单元格,"0.00"))),"","")&IF(LEFT(RIGHT(ROUND(待转换数字或单元格,2),3))=".",TEXT(RIGHT(ROUND(待转换数字或单元格,2)),"[DBNum2]")&"","") -212.23 负贰佰壹拾贰点贰叁

excel表格中的大写数字后面带小数点怎么转换中文大写

比如说在表格中输入12.326然后转换成中文大写"壹拾贰点叁贰陆.回答列表在同一单元格中,再次输入不同的数字,中文大写也跟着变化。

特别说明,此单元格的数字不是金额,只是普通带小数点的数字,小数点后有一至四位小数. 晕,没见过。

问题:在Excel表格中,怎样将带小数点的小写数字转换成中文大写? 比如说在表格中输入12.326然后转换成中文大写"壹拾贰点叁贰陆. 在同一单元格中,再次输入不同的数字,中文大写也跟着变 一、在输入的当前单元格直接转换,没有现成的格式函数。

但通过VBA代码还是能够实现的。

(VBA代码我在后面讲) 如果想简单一点的话,通过相玲单元格转换大写还是方便一点。

如果在 A1 输入小写,就在 B1 输入如下公式: =IF(A1>0,SUBSTITUTE((TEXT(A1,"[DBnum2]")),".","点"),IF(A1<0,"负"&SUBSTITUTE((TEXT(ABS(A1),"[DBnum2]")),".","点"),"")) 上面的公式中考虑了输入负数和零的问题,如不考虑负数和零,公式可以简化如下: =IF(A1>0,SUBSTITUTE((TEXT(A1,"[DBnum2]")),".","点"),"") 二、如果你坚持要在输入数据的单元格中直接转换中文大写,只好用VBA程序代码了,只是比较烦。

代码如下: Private Sub Worksheet_Change(ByVal aa As Range) On Error GoTo error If aa.Column = 1 Then Select Case aa Case Is > 0 aa = Replace(Application.Text(aa, "[DBnum2]"), ".", "点") Case Is < 0 aa = "负" & Replace(Application.Text(Abs(aa), "[DBnum2]"), ".", "点") Case Is = 0 aa = "" End Select End If error: Exit Sub End Sub 说明: 1。

我说的代码实际上是用Execl自带的VBA编程语言编制的一个小程序。

这个程序在你打开工作表的时候已在后台准备运行,当工作表中某个单元格内容发生变化时马上运行。

在程序运行中程序会自动判别,还在第一列的单元格中输入的小写数字都转换成中文大写,在其他单元格中输入的数字不转换大写。

程序是在后台运行的,在工作表窗口是看不见的,只能看见程序运行后的结果。

在工作表的单元格中不能设置这些程序代码。

程序代码只能在VBA编码窗口中编制。

打开VBA编程窗口的方法有好几种,这里只说一种。

在已打开的工作表中,右击您要转换中文大写的工作表标签,在弹出的菜单中选择查看代码,这时VBA编码窗口已打开。

把上面的代码输入到代码窗口中。

当然可以用复制的方法把代码复制过去,这样不容易错。

最后关闭代码窗口,自动回到工作表窗口。

这时你在A1中输入数字试试看,是否得到中文大写的效果。

2。

在上面程序代码中, 已设置为在工作表的第一列任何单元格中输入小写的数字都会马上转换成大写。

其它单元格中输入的数据不会转换。

如想在其它列的单元格中转换数据,请修改第三行代码------Column = 1---- 中的数字。

数字1代表第一列,数字2代表第二列,依次类推。

3。

如果不考虑负数、零等情况的话,代码可以简化如下: Private Sub Worksheet_Change(ByVal aa As Range) If aa.Column = 1 Then aa = Replace(Application.Text(aa, "[DBnum2]"), ".", "点") End If End Sub 采用简化代码的情况下,输入的数字必须 >0 ,如果输入 <=0 的数字会有意想不到结果。

因为代码中没有处理0和<0数字的语句。

请凉解。

五、上面的公式和程序代码只解决特定问题的,不要直接用于人民币大小写的转换。

请多提意见! 问题己解决 你用替换功能呀。

这个适合大批量的转换。

没有这样的功能吧. 这很容易呀,在Excel中就有这样的转换。

选择要转换的数据,或者先在单元格中进行设置,右键/设置单元格格式,选择数字选项卡,选择左边的分类为特殊,然后选择右边的类型为中文大写数字,确定即可。

如此设置小数点的"."不能转换成"点". 在maya123215的回答的基础上,再“查找-替换”嘛,把“.”换成“点”。

maya123215老师用的方法: 右键->设置单元格格式->数字->特殊->数字中文大写 是最简单及常用的方法 由于单元格的内容仍然是数字 12.326, 并非文本格式“壹拾贰点叁贰陆”, 故miaowu老师提议用“查找-替换”嘛,把“.”换成“点”是不可行的 故我提议用以下的公式: 假设A1是 12.326 在任何一格输入公式: =SUBSTITUTE(TEXT($A$1,"[DBNum2][$-804]G/通用格式"),".","点") 便会出现 壹拾贰点叁贰陆 由于中文大写主要是作金额, 单位是 元/角/分 公式变成: =TEXT(INT(A1),"[DBNum2][$-804]G/通用格式")&"元"&IF((INT(A1*10)-INT(A1)*10)=0,"",TEXT(INT(A1*10)-INT(A1)*10,"[DBNum2][$-804]G/通用格式")&"角")&IF(INT(A1*100)-INT(A1*10)*10=0,"",TEXT(INT(A1*100)-INT(A1*10)*10,"[DBNum2][$-804]G/通用格式")&"分") 便会出现 壹拾贰元叁角贰分 注意: 此公式会将小数后第三个位舍去, 如公式要求四舍五入进位, 公式内所有 A1 要改成ROUND(A1,2), 公式便要长很多 呵呵,很好用,但有一个问题,假如小数点后面出现零,就不正确了,如6968.05,就变成了:陆仟玖佰陆拾捌元伍分,但实际需要的是:陆仟玖佰陆拾捌元零伍分,如何实现。

再就是后面是零角零分的情况如何实现。

还有要在本单元格转换如何实现,也就是说转换后的大写金额显示在小写数字所在的单元格。

刚看到你的意见 公式显示是可以解决 “零角伍分” 或 “零伍分”的问题, 但公式较长

修罗云50元/月起香港大宽带NAT VPS,香港沙田建站2核2G5M仅70元/月起

修罗云怎么样?修罗云是一家国内老牌商家,修罗云商家以销售NAT机器起家,国内的中转机相当不错,给的带宽都非常高,此前推荐的也都是国内NAT VPS机器。今天,云服务器网(www.yuntue.com)小编主要介绍一下修罗云的香港云服务器,适合建站,香港沙田cn2云服务器,2核2G,5M带宽仅70元/月起,同时香港香港大带宽NAT VPS低至50元/月起,性价比不错,可以尝试一下!点击进入:修罗云官...

bgpto:BGP促销,日本日本服务器6.5折$93/月低至6.5折、$93/月

bgpto怎么样?bgp.to日本机房、新加坡机房的独立服务器在搞特价促销,日本独立服务器低至6.5折优惠,新加坡独立服务器低至7.5折优惠,所有优惠都是循环的,终身不涨价。服务器不限制流量,支持升级带宽,免费支持Linux和Windows server中文版(还包括Windows 10). 特色:自动部署,无需人工干预,用户可以在后台自己重装系统、重启、关机等操作!bgpto主打日本(东京、大阪...

香港服务器租用多少钱一个月?影响香港服务器租用价格因素

香港服务器租用多少钱一个月?香港服务器受到很多朋友的青睐,其中免备案成为其特色之一。很多用户想了解香港云服务器价格多少钱,也有同行询问香港服务器的租赁价格,一些实际用户想要了解香港服务器的市场。虽然价格是关注的焦点,但价格并不是香港服务器的全部选择。今天小编介绍了一些影响香港服务器租赁价格的因素,以及在香港租一个月的服务器要花多少钱。影响香港服务器租赁价格的因素:1.香港机房选择香港机房相当于选择...

大写数字转换为你推荐
鬼武者3内存修改器鬼武者3 全能修改器 可以改无限一闪 无限血那些的 有的发来564708284@QQ。COM谢了桌面背景图片淡雅桌面壁纸的壁纸美化聚酯纤维和棉哪个好聚酯纤维面料和纯棉面料哪个好麒麟990和骁龙865哪个好5G手机芯片高通865对比麒麟990 5G SOC哪个好?手机浏览器哪个好手机什么浏览器最好用法兰绒和珊瑚绒哪个好请问天鹅绒法兰绒和珊瑚绒哪个好啊 想买套床上用品车险哪个好人保和平安车险哪个好云盘哪个好网络云盘哪个好用牡丹江教育云空间登录牡丹江教育云平台学生注册错了怎么办?飞信空间登录飞信客户端空间登录 飞信绿色版历史记录
上海虚拟主机 成都虚拟主机 购买域名和空间 西安服务器 kdata 阿里云代金券 150邮箱 警告本网站美国保护 linux空间 怎样建立邮箱 新家坡 91vps 傲盾官网 hktv 酷番云 服务器维护 广州虚拟主机 免费个人主页 深圳域名 工信部icp备案查询 更多