EXCEL中如何用函数自动生成金额大写？例如在A1输入47932，A2自动生成大写

A2输入

=TEXT(A1,"[dbnum2]")&"元整"

如果金额都是整数，直接单元格式设置成倒数第二个特殊形式，1248会显示：壹仟贰佰肆拾捌
后&“元整”

如果是带小数的，则只有采用插件，例如123.45会显示壹佰贰拾叁.肆伍（几角几分无法完美显示）

用公式：
=NUMBERSTRING(A1,2)&IF(MOD(A1,1)<>0,TEXT(MOD(A1,1)*100,"[DBNum2]圆0角0分"),"圆")

给你一个自定义函数，可以完美的解决然这个问题：
Public Function Drmb(Amountin)
Drmb = Replace(Application.Text(Round(Amountin + 0.00000001, 2), "[DBnum2]"), ".", "元")
Drmb = IIf(Left(Right(Drmb, 3), 1) = "元", Left(Drmb, Len(Drmb) - 1) & "角" & Right(Drmb, 1) & "分", IIf(Left(Right(Drmb, 2), 1) = "元", Drmb & "角整", IIf(Drmb = "零", "", Drmb & "元整")))
Drmb = Replace(Replace(Replace(Replace(Drmb, "零元零角", ""), "零元", ""), "零角", "零"), "-", "负")
End Function
将这段函数复制到你的表格VBE中，你就可能像正常的函数，在A2中输入“＝Drmb(A1)”就可以了