复制如下代码，其中L2为要转换的单元格位置；"[DBNum1]"为小写中文数字，如一、二、三等等；"[DBNum2]"为大写中文数字，如壹、贰、叁等等。
=TEXT(L2,"[DBNum1]")
其中，直接使用上面的"[DBNum1]"，大于9，小于20中间的会变成一十一、一十二等等，解决这个问题的办法是使用if来判断，把代码改成下面的就可以了
=IF(ROW(L2)>20,TEXT(L2,"[dbnum1]"),TEXT(L2,"[dbnum1]d"))
"[DBNum2]"大于9，小于20中间还是会变成类似上面的，可以使用"[DBNum20]"来实现如上功能。
注："[DBNum20]"在WPS下实现，因为本电脑未安装EXCEL，所以没有测试。理论上是可以实现的。
如果内容对你有用，请花费几秒钟给个评论！
由于评论审核机制，可能您的评论暂时不可见，不影响查看回复可见的内容！
扫描二维码推送至手机访问。
版权声明：本文由云淡风轻Mr.Liu发布，如需转载请注明出处。
更多实用VBA小代码，请持续关注本公众号，设定中的小代码系列一共有108集哦~ 0，工作表处理：（点击目录，即可跳转到相关文章，不用回复关键词） VBA常用小代码001：一键生成带超链接的工作表目录…
《一大波常用函数公式》微信推送后，同学们很是喜爱，今天重发，小伙伴们可以收藏一下，在日常工作中如果有类似的问题，拿来即用。 话不多说，上菜—— 1、查找重复内容公式： =IF(COUNTIF(A:A,…
SUBSTITUTE函数是Excel最常用的文本函数之一，在数据分析过程中，常用于字符串的整理和清洗。 SUBSTITUTE函数的基础语法是： SUBSTITUTE(要替换的文本,旧文本,新文本,[替…
天天我等着你等着你捉泥鳅 大哥哥好不好咱们去捉泥鳅……[aplayer url="http://rr03.sycdn.kuwo.cn/872f98ac705fee2c92997ac112b3…
之前我们分享了一期小代码，内容是如何将word中表格的数据读入excel……之后有朋友表示知道了，又问如何将excel中的数据写入word……此时此刻，我再一次清醒的意识到，这世界上像我这样好的人已经…
晚上好啊都……呃……不知道该说什么了，直接说正事吧……话说我最近比较懒……不是，我最近事情比较多……你们在后台提了很多问题，有一部分是我们之前分享过的，戳菜单【VBA相关】→【常用小代码】，可见详情；…