当然，Excel里自带了点儿东西，不是完全没有。提起数字转换，很多人可能知道那个叫NUMBERSTRING 函数的。嘿，听着挺专业吧？输入一个数字，告诉它想要哪种格式，它就能吐出相应的文本。这函数有几种模式（专业里叫“类型”）：类型1就是把阿拉伯数字转成最简单的中文数字，像“123”变“一二三”，这有啥用啊，发票上可不能这么写。类型2呢，稍微好点儿，把阿拉伯数字转成简体中文数字，就是“123”变“一百二十三”，这个看着像那么回事了，但用在钱上还是不对劲，缺了“元”“角”“分”这些单位，更别提“整”了。
我们真正盯着的是类型3，NUMBERSTRING 函数的类型3。它会把数字转成大写金额的初步形态，比如=NUMBERSTRING(1234.56, 3)，出来的结果是“壹仟贰佰叁拾肆点伍陆”。看到没？虽然用了大写数字，但它把小数点直接变成了“点”，后面的“伍陆”也没有单位。这离我们的目标——“壹仟贰佰叁拾肆圆伍角陆分”——差了不止一星半点儿。有时候碰到整数，比如=NUMBERSTRING(100, 3)，出来的是“壹佰”。按规矩得写“壹佰圆整”才对。所以，指望一个NUMBERSTRING 函数搞定所有，那真是想太多了。它只能算个半成品，打个底子，你还得进一步处理。
这个进一步处理，可就麻烦了。你得嵌套一堆别的函数，判断有没有小数，小数有几位，有没有零，然后拼字符串。用IF、TEXT、LEFT、RIGHT、MID、FIND……想想都脑仁疼。写出来的函数公式，能绕地球一圈，改动起来更是噩梦，一不小心括号匹配错了，或者判断条件漏了，结果就不对。对于我这种看到复杂公式就头大的普通用户来说，这方法，emmm，效率提升有限，错误率依然感人。而且，这公式写出来只适用于特定的单元格，复制粘贴到别处可能还得改引用，麻烦！
折腾来折腾去，跟同事交流，网上各种Excel大神那里潜水，终于挖到了真正的宝藏——VBA，也就是宏！这玩意儿可太强大了，它可以让你自定义函数，写一段小程序来完成特定的任务。用VBA写一个把数字转换成大写金额的函数，那才是正道。虽然听着有点吓人，好像要写代码似的，但其实很多现成的VBA代码片段网上都有，稍微懂点儿基础知识就能用。
怎么用VBA呢？很简单。打开你的Excel文件，按Alt+F11，这会打开VBA 编辑器窗口。别被那些花花绿绿的代码吓到，找到左边项目窗口里的你的工作簿名称，右键点击，选择“插入”->“模块”。然后在右边那个空白的大框里，把你的自定义函数代码复制进去。网上有很多成熟的VBA代码，能非常准确地处理各种情况，包括零的出现、小数的处理、末尾是零的单位（比如“壹佰圆整”、“伍角整”等等）。
一段经典的VBA代码写出来的自定义函数，名字可能叫ConvertCurrency或者大写金额什么的。代码逻辑很清晰：它会判断你的数字是不是小于零，是不是太大（超过了金额大写的表示范围，比如万亿以上），然后把整数部分和小数部分分开处理。对整数部分，它会按照“个十百千”、“万”、“亿”这样的层级来转换，加上大写数字和对应的单位（拾、佰、仟、万、亿）。处理小数部分时，它会特别判断有没有“角”和“分”，没有就加“整”。碰到像101这种中间有零的，也能正确处理成“壹佰零壹圆整”。是不是听着就比手动拼接字符串靠谱多了？
代码放进去后，回到你的Excel工作表。在需要显示大写金额的单元格里，就像使用普通Excel函数一样，输入=，然后跟上你刚刚定义的那个自定义函数的名字，比如=大写金额(A1)，其中A1就是包含你要转换的数字的单元格。敲下回车，铛铛铛！正确的大写金额就自动蹦出来了，而且是准确无误的“壹仟贰佰叁拾肆圆伍角陆分”！这感觉，就像武林高手打通了任督二脉，豁然开朗啊！
不过，用VBA也有点小坑需要注意。因为VBA是宏的一种，涉及到安全性问题，你的Excel可能会弹出安全警告，问你是否要启用宏。一定要选择启用宏，否则自定义函数是用不了的。还有，如果你的文件里包含了VBA代码，保存的时候不能再是普通的.xlsx格式了，得选择启用宏的工作簿 (.xlsm)格式。这样下次打开，宏代码还在，你的自定义函数才能继续用。
总的来说，NUMBERSTRING 函数自带的类型3只能算个基础工具，应对简单情况或者作为进一步处理的起点还可以，但要真正实现复杂准确的大写金额转换，尤其是财务、报销这种对准确性要求极高的地方，VBA的自定义函数几乎是唯一的完美解决方案。虽然刚开始接触VBA可能有点畏难情绪，但网上资源很多，找一段成熟的代码复制粘贴，然后学会怎么使用它，投入产出比简直爆表。想想看，以后再也不用对着数字愁眉苦脸地一个字一个字写大写了，直接一个公式搞定，不香吗？在我看来，学会用VBA解决Excel里的这类重复、易错的问题，绝对是提升效率的杀手锏。特别是那些批量转换的场景，没有VBA简直寸步难行。所以，别犹豫了，Alt+F11走起！去体验一下自定义函数的魔力吧，你会发现，Excel的世界远比想象的要精彩和高效。
发表回复