事件程序调用自定义函数问题

zhc19620430 · 发表于 2012-4-2 20:35

自定义函数 Function UpperNum(N)在工作表运行可以，如果我使用
Private Sub Worksheet_Change(ByVal Target As Range)
Target.Range("H1") = UpperNum(Range("g14"))
End Sub
运行却出现提示图中的问题，我该怎么做。谢谢。

该贴已经同步到 zhc19620430的微博

baomaboy · 发表于 2012-4-2 20:48

一看就是死循环啊，按道理改成Worksheet_SelectionChange事件一试便知，果然是。

zhc19620430 · 发表于 2012-4-2 20:54

baomaboy 发表于 2012-4-2 20:48
一看就是死循环啊，按道理改成Worksheet_SelectionChange事件一试便知，果然是。

类似这样的问题如何去改，上面自定义的是一个小写金额改大写的函数公式，按F5运行可以到结果，但不会自动运行。我也是才学习，希望说说怎么做可以吗。

baomaboy · 发表于 2012-4-2 21:03

本帖最后由 baomaboy 于 2012-4-2 21:11 编辑

zhc19620430 发表于 2012-4-2 20:54
类似这样的问题如何去改，上面自定义的是一个小写金额改大写的函数公式，按F5运行可以到结果，但不会自动 ...

自定义函数本身就都是自动计算的啊，根本无需其他过程更不用事件来驱动啊。
短信收到，我不明白你为什么要用额外的过程甚至是事件去写入自定义函数，如果只是为了自动计算和更新的话，自定义函数本身就可以。

		自动登录	找回密码
密码			免费注册

[求助] 事件程序调用自定义函数问题

最新热点 /1