Excel VBA之第六十五课
大家好,前面我们学习了工作表的一些常见方法,从本节课开始我们来学习工作表对象的事件。当工作表被激活、用户更改工作表上的单元格或数据透视表时,就会触发工作表事件。Worksheet对象的事件有:Activate、BeforeDoubleClick、BeforeRightClick、Calculate、Change、Deactivate、FollowHyperlink、PivotTableUpdate、SelectionChange。接下来的课程我们将介绍这里面一些常见的工作表事件。
首先学习一下如何为为工作表对象指定事件过程,方法如下:
1、在“工程资源管理器”窗口中,选择要编写事件代码的工作表对象(比如Sheet1):
2、然后按【F7】键,或者直接双击工作表对象Sheet1,打开代码窗口:
3、在代码窗口单击“对象框”右侧的下拉按钮,从下拉列表中WorkSheet选项:
4、此时会在代码窗口中自动出现工作表对象的默认事件程序的开头Private Sub Worksheet_SelectionChange(ByVal Target As Range)和结尾End Sub,如下图所示:
5、单击“过程/事件框”右侧的下拉按钮,从下拉列表中选择要对工作表对象设置的具体事件:
比如要对工作表Sheet1指定Change事件,就从“过程/事件框”下拉列表中选择Change选项,此时系统就会自动列出Private Sub Worksheet_Change(ByVal Target As Range)和End Sub,如下图:
然后你就可以在这两个语句之间编辑代码了。
那么本节课就来学习一下工作表的Activate事件,也叫激活事件。当工作表从非活动状态(即另一个工作表称为活动工作表)转为活动状态时产生此事件。例如现在工作簿的活动工作表为Sheet1,现在单击Sheet2工作表,那么可以在Sheet2工作表中设置如下的事件代码:
当我从Sheet1切换到Sheet2时,就会发生这个事件:
你可以根据这个事件来编排其他符合自己需要的代码。