人民币数字大写数字大写问题
发布网友
发布时间：2022-04-19 10:18
共2个回答
热心网友
时间：2023-07-01 17:07
Function dx(Byval M as range) as String
dx = Replace(Replace(Replace(Join(Application.Text(Split(Format(M, " 0. 0 0;负 0. 0 0; ")), ["[DBnum2]"&{0,"","圆0角;;圆零","0分;;整"}]), a), "零圆零", a), "零圆", a), "零整", "整")
End Function
热心网友
时间：2023-07-01 17:07
问代码类问题，首先要给出代码。
