如何在控件Click函数中调用控件本身的实例？（Vba是否有反射机制？）

khris · 发表于 2010-9-10 22:25

请教各位，本人最近制作一个excel文档，上面有大量按钮，每个按钮的响应事件做的工作基本相同，但是每个按钮的响应函数都不同，因为在代码中，我动态的获取了按钮的所在行数，所以每个按钮的响应函数我都调用了按钮本身的实例，请问vba中是否具有反射机制，在按钮的响应函数中调用自己本身?

我的代码如下：

Private Sub CommandButton1_Click()

Dim row, col As Integer
row = GetRCX(CommandButton1)
col= GetRCY(CommandButton1)

Cells(row, col + 1) = “hello”

End Sub

望达人赐教！

HHAAMM · 发表于 2010-9-10 22:44

没太看明白
楼主论坛搜索下，关键字子类化控件

khris · 发表于 2010-9-10 22:55

你好，感谢你的回复，子类化控件对我好像有些难度，我的代码中有很多按钮的click函数。在每个函数中我都会调用GetRCX和GetRCY来获取按钮的位置，问题是这两个函数的参数是按钮本身，如果vba不能实现在click函数调用控件本身，我只能在调用这两个函数的调用中明确的指明按钮名称，如果是这样的话，那么我有100个按钮，我只能修改100个按钮的响应函数，那样的话实在太麻烦了。这么解释您能理解了吗？

不知道子类化控件能否实现？我是不会。

[ 本帖最后由 khris 于 2010-9-10 22:56 编辑 ]

khris · 发表于 2010-9-10 23:53

顶一下～

希望大家帮忙！

HHAAMM · 发表于 2010-9-11 00:46

示例

HHAAMM · 发表于 2010-9-11 01:35

没见你回复说对不对，按猜测的意思给你写了

求助的倒是先撤了

khris · 发表于 2010-9-15 16:56

实在太感谢了，问题解决了，谢谢HHAAMM大哥！

XZ19860527 · 发表于 2010-9-25 11:19

趴个窝学习下

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

[求助] 如何在控件Click函数中调用控件本身的实例？（Vba是否有反射机制？）

回复 2楼 HHAAMM 的帖子