练习小课堂

04-13Ctrl+D 收藏本站

关灯 直达底部

(1)编写程序,当选中A1单元格时,提示A1单元格的内容。

(2)编写程序,当选中的单元格不是A列的单元格时,自动选中同行A列的单元格。

参考答案

(1)

(2)

Worksheet_Activate事件:自动提示工作表名

Worksheet_Activate事件告诉Excel,当激活工作表时自动运行程序。

在Sheetl工作表模块里写入程序,重新激活工作表,程序就自动运行了,如图5-9所示。

图5-9 激活工作表时自动运行程序

Worksheet_Deactivate事件:禁止选中其他工作表

Worksheet_Deactivate事件告诉Excel,当工作表由活动工作表变为不活动工作表时自动运行过程。

在Sheetl工作表模块中写入下面的程序:

输入程序后,当激活其他工作表时,Excel会进行提示,并自动重新激活Sheetl工作表,如图5-10所示。

图5-10 禁止激活其他工作表

5.2.3 Worksheet事件列表

Worksheet对象一共有9个事件可供使用,如表5-1所示。

表5-1 Worksheet对象的事件列表

事件名称事件说明Activate激活工作表时发生BeforeDoubleClick双击工作表之后,默认的双击操作之前发生 BeforeRightClick右击工作表之后,默认的右击操作之前发生 Calculate重新计算工作表之后发生 Change工作表中的单元格发生更改时发生 Deactivate工作表由活动工作表变为不活动工作表时发生 FollowHyperlink单击工作表中的任意超链接时发生 PivotTableUpdate在工作表中更新数据透视表之后发生 SelectionChange工作表中所选内容发生更改时发生