老哥,来看看VBA调用工作表函数,参数为什么会出现错误?
excel吧
全部回复
仅看楼主
level 1
kaiwenworld 楼主
Sub sb()
Debug.Print Application.WorksheetFunction.text(Fix(ActiveCell), "[dbnum2];负[dbnum2]G/通用格式;零元")
End Sub
用来数值整数部分转换成中文大写金额用的,出错的部分主要在"负[dbnum2]G/通用格式"这个部分,但是直接工作表用text这个参数是能正常得到结果的,请问下VBA中,要如何写这个参数才能通过???
只是想看看VBA中如何的写法才能识别这个参数,想知道里面有什么特俗的规则?[委屈]
2025年12月26日 06点12分 1
level 7
贴吧用户_0K8UP3S101
你先试下这样是不是想要的效果。
Debug.Print Application.WorksheetFunction.text(Fix(ActiveCell), "[DBNum2]G/通用格式元")
如果不是，就请举例说明下需求。代码不搞逆向猜测。
2025年12月26日 06点12分 2
kaiwenworld
也是通不过的:我觉得问题是出在G/通用格式这里,应该要用什么特色的写法
2025年12月26日 07点12分
level 7
贴吧用户_0K8UP3S101
无有效信息，不猜了。
2025年12月26日 08点12分 3
kaiwenworld
哎 ，你能过 ，我的真过不了，我下面回复有截图，也许我少引用了什么库把[汗]
2025年12月27日 03点12分
level 9
娜乌_西卡
代码可以直接用，并没有报错，显示结果也符合预期，没看出有什么问题
虽然负数会显示2个负字，但很明显是有意这么设置的，并不算错误
2025年12月26日 09点12分 4
kaiwenworld
加负和G/通用格式，是因为我这里只用[DBnum2]结果比较尴尬，比如-1的话，会得到结果-壹.怎么好像你们都能得到正确结果，就我的不行，看下我下面用过的截图是真过不了
2025年12月27日 03点12分
level 12
yky洋洋
用函数不香？用格式不香？
2025年12月26日 12点12分 5
kaiwenworld
写自定义函数，做加载项用的，OK了就比你说的方式都要简便。[汗]当然我也可以避开这样写，用其他的方式做，但是有个知识盲点还是要问为什么的，不负学习的态度。[呵呵]
2025年12月27日 03点12分
level 1
kaiwenworld 楼主
2025年12月27日 03点12分 6
贴吧用户_0K8UP3S101
EXCEL对人民币大写的处理绝对不如WPS。 EXCEL里，试下用这句：Debug.Print Replace(Application.WorksheetFunction.Text(Fix(ActiveCell), "[DBNum2]"), "-", "负") & "元"
2025年12月27日 14点12分
yky洋洋
@贴吧用户_0K8UP3S101 这楼我认同
2025年12月28日 00点12分
1