[已解决]如何用窗体控件引发工作表change事件

徐淑颖

附件.rar (1.85 KB, 下载次数: 43)

2011-8-3 13:30 上传

点击文件名下载附件


请教，我一张工作表里有很多单选框；
我想选中哪个单选框的时候，它的边框就设置成红色，其余的单选框边框无色；
{:011:}

最佳答案

月排行榜 / 总排行榜

无聊的疯子

2011-8-4 17:00

其实直接用这个就可以触发 Change 事件,把代码转进 Change 事件中,简单点

重新把附件修改了一下,传到这楼来

(, 下载次数: 155)

上传

点击文件名下载附件

1. Sub I1_Select()
   
2.     Application.ScreenUpdating = False
   
3.     Sheet1.Range("A1") = Sheet1.Range("A1") + 1
   
4.     Application.ScreenUpdating = True
   
5. End Sub

复制代码

跳转到最佳答案楼层

那么的帅

回复 徐淑颖 的帖子

用类模块完成。

Zipall

你用的是窗体控件还是vba工具箱里的控件?

徐淑颖

回复 Zipall 的帖子

我用的是窗体控件！{:011:}猫哥，请指导！

徐淑颖

回复 那么的帅 的帖子

{:011:}帅哥能说具体点 嘛，最好能来个小例子！谢谢

无聊的疯子

回复 徐淑颖 的帖子

最好来个附件,要控件都齐了的附件!!

徐淑颖

回复 无聊的疯子 的帖子

{:091:}附件来了！

Zipall

回复 徐淑颖 的帖子

窗体控件没有click事件,不会{:1512:}

徐淑颖

回复 Zipall 的帖子

啊？那有如果某个单元格变化的事件吗？选择那个单选框的时候，链接的单元格数值会变化，是不是也可以激活代码呢？{:091:}

Zipall

回复 徐淑颖 的帖子

不可以~~
sheet的change事件不响应窗体控件对控制单元格的修改.