做财务、采购、合同这块的朋友，大概都碰到过同一个场景：台账里一列小写金额，另一列必须同步输出人民币大写，而且要求一个字都不能错。手工敲过几十行之后，眼睛就开始花，“壹拾”写成“拾”、“零角”漏掉、“整”字乱加，都是常见事故。Excel金额转人民币大写这件事，看起来是个格式问题，实际上牵扯到三层东西：显示层的格式代码、计算层的公式逻辑、以及工程层的可维护性。三种主流实现方法——自定义单元格格式、函数公式、VBA 自定义函数——走的正是这三条路，各有各的甜头和坑。
这篇东西适合谁看？如果你只是偶尔转一两笔金额，第一种方法五分钟就能搞定；如果你要做一张几百行的付款清单，公式法更合适；如果你每月都要出同样的表，或者要发给同事一起用，那 VBA 方案值得花半小时配置一次。下面我按“为什么要这么做”到“具体怎么做”再到“哪里会翻车”的顺序，把三种方法掰开讲清楚，参数、代码、避坑点都给到位，你可以直接照着抄。
1. 先把需求拆开：金额大写到底在解决什么问题
1.1 三种方法的定位差异，决定了你该选哪个
很多人上来就问“哪个公式最好”，其实这个问题问偏了。三种方法的差别不在于谁更“高级”，而在于它们作用在数据流的哪个环节。单元格自定义格式作用在“显示层”，它完全不改变单元格里存的值，只是把 1234.56 这个数字“画”成大写的样子；函数公式作用在“计算层”，它读取源数值，经过一串运算，把结果作为文本写到另一个单元格里；VBA 自定义函数本质也是计算层，只不过把那段又长又难维护的公式换成了可读的代码。
这个差异带来的直接后果是：格式法生成的大写不能复制到别处当文本用，你选中单元格复制，粘到记事本里出来的还是1234.56；公式法和 VBA 法生成的是真正的文本，能复制、能拼接、能导出。反过来，格式法不占额外单元格，原值可以继续参与求和、透视，而公式法需要多一列，VBA 法也需要多一列但表会更干净。
所以选型的第一问不是“哪个好”，而是“这份大写最后要拿去干什么”。如果只是打印出来看一眼、贴在 Word 里做附件，格式法够用；如果要导出给银行、要做电子归档、要进 ERP 系统，那必须是真文本，公式或 VBA 二选一。
1.2 大写金额的书写规则，先搞清楚再动手
不管用哪种方法实现，最后输出的字符串都得符合通行写法，否则工具再好也是错的。我把财务票据上最常见的几条规则列出来，后面所有实现都围绕这几条来校验。
| 规则点 | 正确写法 | 常见错误 |
|---|---|---|
| 到元为止无角分 | 壹仟贰佰叁拾肆元整 | 漏“整”字，或写成“元正”混用 |
| 有角无分 | 壹仟贰佰叁拾肆元伍角整 | “伍角”后不加“整”，或加了“分” |
| 有分 | 壹仟贰佰叁拾肆元伍角陆分 | 分后加“整” |
| 元位为零、有角分 | 零元伍角陆分 / 伍角陆分 | 写成“元伍角陆分” |
| 角位为零、有分 | 壹佰元零伍分 | 漏“零”，写成“壹佰元伍分” |
| 连续多个零 | 壹万零壹元 | 写成“壹万零零壹元” |
| 十位数字 | 壹拾元 | 简写成“拾元” |
| 负数（冲销、红字） | 负壹佰元整 | 直接输出绝对值，丢了符号 |
注意：不同单位、不同系统对“零元伍角陆分”还是“伍角陆分”的偏好不一样，交付前最好跟接收方确认一次，别自己拍脑袋。这条看似小事，实际退单率挺高。
还有一条容易被忽略：大写金额的“零”不是逐位翻译出来的。1234.56 逐位翻译是“壹贰叁肆伍陆”，那是数字串不是金额。金额大写必须带位权（拾、佰、仟、万、亿），并且在连续零的位置做合并。这就是为什么简单的查找替换搞不定，必须走位权逻辑。
2. 方法一：单元格自定义格式，零代码的显示层方案
2.1 格式代码怎么拼，[DBNum2] 是核心
Excel 内置了一组中文数字格式代码，写在自定义格式的方括号里，[DBNum1]输出“一二三”，[DBNum2]输出“壹贰叁”，这就是大写金额的实现基础。操作路径很直白：选中单元格，右键“设置单元格格式”，选“自定义”，在类型框里输入代码。
最基础的整数版长这样：
[DBNum2]01234 显示为“壹仟贰佰叁拾肆”。想带上“元整”，就在后面拼字面量，注意字面量要用英文双引号包起来：
[DBNum2]0"元整"想加“人民币”前缀：
"人民币"[DBNum2]0"元整"带小数的版本就麻烦一点。写[DBNum2]0.00会得到“壹仟贰佰叁拾肆.伍陆”，小数部分是逐位转的，而且是小数点不是“角分”。想让它显示成“元角分”的样子，得用0.00搭配字面量硬拼：
"人民币"[DBNum2]0"元"0"角"0"分"这个写法在整数金额上会露馅——1234.00 会显示成“人民币壹仟贰佰叁拾肆元零角零分”，而规范写法应该是“壹仟贰佰叁拾肆元整”。格式代码没有办法做“如果为零就省略”的判断，这是它的天花板。
2.2 用分段格式处理正负数，但别指望它能判断零
自定义格式支持最多四段，用分号隔开，顺序是“正数;负数;零;文本”。利用这个特性可以处理负号：
[>=0]"人民币"[DBNum2]0"元整";"人民币负"[DBNum2]0"元整"注意这里用了条件判断[>=0]的写法，两个条件段覆盖正数和负数。第三段留给零值：
[>=0]"人民币"[DBNum2]0"元整";[<0]"人民币负"[DBNum2]0"元整";"零元整"这样 0 会显示“零元整”，-500 显示“人民币负伍佰元整”。看起来挺完整了对吧？但只要你输入带小数的金额，问题立刻回来：格式代码无法把小数部分单独拎出来判断“角为零分不为零”这种情况，只能老老实实输出“X元零角Y分”。
我试过用#占位符做一些投机取巧，比如[DBNum2]0"元"#，效果不稳定，不同版本表现还不一致。所以这里给个明确结论：格式法只适合整数金额，或者对小数部分格式要求不严格的场合。真要做严谨的票据，往下看公式法。
2.3 这个方案的硬伤，用之前必须知道
第一个硬伤刚才说了，小数处理不到位。第二个硬伤更隐蔽：显示与实际值脱节。你在单元格里输入 1234.567，格式设成两位小数，显示出来的大写是按 1234.57 画的，但单元格里存的还是 1234.567，求和的时候按原值算。打印出来对得上，一算总数差几分钱，这种账最难查。
第三个硬伤是复制问题。同事发给你一张表，你把大写列复制到另一个文档，粘出来是数字不是文本，因为他用的是格式法。这个事在协作场景里几乎每周都会发生一次。
提示：如果你确实要用格式法，最好在表头注明“本列大写为显示格式，原值见左侧小写列”，减少误会。另外格式法生成的显示内容无法被筛选、无法被 VLOOKUP 匹配，做数据关联时不能用。
那格式法还有什么用？用处其实不小：核对。你有一列用公式算出来的大写，想快速验算有没有错，可以把原值复制一份，套上格式，两列并排看，不一致的地方一眼就能挑出来。这是个很实用的临时手段。
3. 方法二：公式法，让大写金额跟着数字自动变
3.1 拆解思路：把金额切成整数、角、分三块
写公式之前先在纸上把逻辑捋清楚。任何一笔金额，规范化之后可以拆成三段：整数部分（元）、十分位（角）、百分位（分）。三段的处理规则完全不同：
- 整数部分：走位权转换，用
TEXT(数值,"[DBNum2]0")一步到位，这个函数在公式里同样可用。 - 角：如果为 0 且分不为 0，要补一个“零”字；如果都为 0，整个角分段替换成“整”。
- 分：为 0 时角后面跟“整”，不为 0 时正常输出“X分”。
这里有个关键动作很多人会漏掉：在拆解之前先做一次四舍五入。因为浮点数在计算机里存的是二进制近似值，1.005 这种数在内存里可能是 1.00499999，直接取两位小数会变成 1.00，少一分钱。所以第一步永远是ROUND(ABS(A1),2)，把值钉死在两位小数上，后面所有运算都基于这个规范化后的值。
取角取分也有讲究。用INT(v*10)-INT(v)*10这种数值运算，容易踩浮点误差；比较稳的做法是先TEXT(v,"0.00")转成字符串，再用MID和RIGHT按位置取字符。字符串操作没有精度问题，取出来是什么就是什么。
3.2 辅助列版：一步一步拼，新手最容易看懂
假设金额在 B2 单元格，我建议第一次做的时候别急着写单格嵌套公式，用辅助列把每一步摊开。摊开之后你会发现逻辑其实很简单，以后想改也好改。
| 列 | 公式 | 作用 |
|---|---|---|
| C2 | =ROUND(ABS(B2),2) | 规范化金额，消除浮点误差 |
| D2 | =TEXT(C2,"0.00") | 转成固定两位小数的字符串 |
| E2 | =INT(C2) | 整数部分 |
| F2 | =MID(D2,LEN(D2)-1,1) | 角位数字 |
| G2 | =RIGHT(D2,1) | 分位数字 |
| H2 | =IF(E2=0,"",TEXT(E2,"[DBNum2]0")&"元") | 元的部分，为零时留空 |
| I2 | =IF(F2="0",IF(G2="0","整",IF(E2=0,"","零")&TEXT(G2,"[DBNum2]0")&"分"),TEXT(F2,"[DBNum2]0")&"角"&IF(G2="0","整",TEXT(G2,"[DBNum2]0")&"分")) | 角分部分的核心判断 |
| J2 | =IF(C2=0,"零元整",IF(B2<0,"负","")&H2&I2) | 最终结果 |
I2那一串看着吓人，其实就是一个四分支判断：角为零分也为零，输出“整”；角为零分不为零，元位有数就补“零”再输出分，元位无数就直接输出分；角不为零分为零，输出“X角整”；角分都不为零，正常输出“X角Y分”。四个分支对上了，结果就不会错。
我实测下来，这套辅助列方案最大的好处是可调试。哪一行输出不对，你从 C 列往右一格一格看，立刻能定位是哪一步判断出了问题，不用对着一个两百字符的嵌套公式找括号。
3.3 单单元格版：LET 加持与传统嵌套写法
辅助列看着清爽，但实际交付时往往不方便多加七列。这时候要么把公式合并成一个，要么用新版 Excel 的LET函数。LET的好处是可以在公式内部定义中间变量，既保持单格输出，又保持可读性：
=LET(v,ROUND(ABS(A1),2), s,TEXT(v,"0.00"), n,INT(v), j,MID(s,LEN(s)-1,1)*1, f,RIGHT(s,1)*1, y,IF(n=0,"",TEXT(n,"[DBNum2]0")&"元"), jf,IF(j=0,IF(f=0,"整",IF(n=0,"","零")&TEXT(f,"[DBNum2]0")&"分"), TEXT(j,"[DBNum2]0")&"角"&IF(f=0,"整",TEXT(f,"[DBNum2]0")&"分")), IF(v=0,"零元整",IF(A1<0,"负","")&y&jf))逐行解释一下这段：v是规范化后的绝对值，s是两位小数字符串，n是整数部分，j和f分别是角位和分位数字（后面的*1是把文本类型的字符转成数值，TEXT函数对数值的处理更稳）。y拼元的部分，n为 0 时留空，避免出现“零元伍角”这种别扭写法。jf就是刚才那套四分支判断。最后一行做总装，先判零值，再加符号。
如果你的 Excel 版本不支持LET（大概 2021 之前的版本），就只能写传统嵌套了。把上面每个变量名直接替换成它对应的表达式，会得到一个两百多字符的巨型公式，写的时候建议先在记事本里排版好，一段一段粘进去，中途别在 Excel 的编辑栏里直接改，那玩意儿一卡就前功尽弃。
传统嵌套版我一般会做一点简化，牺牲一点严谨换可读性，比如预先约定A1必须是正数且已四舍五入，把ROUND和ABS挪到上游去处理。这样公式主体能缩短三分之一，出错概率也低。
提示：公式法有一个很实用的变体——把最终公式放在“结果列”，但同时在旁边留一列用格式法生成的对照值。每次改表结构之后，比较这两列是否始终一致，能快速发现公式被意外改坏的情况。
4. 方法三：VBA 自定义函数，一次写好一劳永逸
4.1 完整代码，可直接粘进模块
公式法的天花板在哪？在大额金额和复杂边界上。位数一多，嵌套公式长得没法维护；边界条件（比如亿级带零、负数、分位舍入）每加一条，公式就膨胀一圈。这时候换 VBA 是最省心的。
按Alt+F11打开编辑器，插入一个标准模块，把下面这段粘进去：
Option Explicit Private Function DigitArr() As Variant DigitArr = Split("零
