关于EXCEL函数的问题

在使用EXCEL过程中，经常需要将数字表示为大写的数字金额，可用以下三种方法来实现：
1、用单元格格式的方法：可以用于整数大写金额的显示，第一次使用时，只需在要转换为大写的数字的单元格中，选“单元格格式”“数字”选项下“特殊格式”的“中文大写数字”，`即可将数字显示为大写，然后再选择“自定义格式”，在类型框中将“[DBnum2]G/通用格式”改为 “[DBnum2]G/通用格式”元整””或“[DBnum2]”元整””。以后直接选用“自定义格式”中“[DBnum2]”元整””即可实现金额的大写显示。
2、用TEXT函数的方法：可用于将整数金额转换为大写的字符串，使用方法为： =TEXT(value,”[DBnum2]”) & ”元整” 其中value为整数的金额数字，“[DBnum2]”为表示为大写的格式字符，如：=TEXT(12000,”[DBnum2]”) &”元整” 结果为“壹万贰仟元整”
=TEXT(12,”[DBnum2]”) &“元整” 结果为“壹拾贰元整”3、使用自定义函数方法：可以实现任意数字的金额大写转换。如自定义函数名称为RMB_DX，其VB代码如下：
Function RMB_DX(money As Variant)
Dim m1 As Long, n1 As Long, n2 As Integer, n3 As Integer
m1 = Application.WorksheetFunction.Round(money * 100, 0)
n1 = Int(m1 / 100)
n2 = Int(m1 / 10) - n1 * 10
n3 = m1 - n1 * 100 - n2 * 10
If n3 = 0 Then
RMB_DX = "整"
Else
RMB_DX = Application.WorksheetFunction.Text(n3, "[DBnum2]") & "分"
End If
If n2 = 0 Then
If