【周五•VBA进阶】打开工作表自动提示工作表名称。Excel VBA Worksheet工作表事件介...

Excel 2013VBA进阶实战教程系列

第-6.2-节  Worksheet工作表事件

智能自动化无处不在的今天，可你的Excel还停留在单纯的计算上。今天，小编excel小课堂(ID：excel-xiaoketang 长按复制)就为各位介绍下Excel VBA中称作“事件”的过程程序，能够对我们的操作自动作出相应的响应。例如，根据数值大小，自动显示上升或下降箭头。

01

Worksheet工作表事件

工作表上的事件在默认情况下是可用的。若要查看工作表的事件过程，请用鼠标右键单击工作表标签，再单击快捷菜单上的“查看代码”。在“过程”下拉列表框内选择事件名称。工作表级事件发生在工作表被激活、用户更改工作表上的单元格或数据透视表更改时。

02

激活与关闭工作表事件

Worksheet_Activate()事件激活一个工作表时产生此事件。切换两个显示同一个工作簿的窗口时，将产生 WindowActivate 事件，但不产生工作簿的 Activate 事件。新建窗口时不产生本事件。

Worksheet_Deactivate()当转移到其他工作表时触发该事件。

示例：以激活与关闭工作表事件工作表为例，当激活使激活与关闭工作表事件工作表成为活动工作表时，以及转移到其他工作表时，分别显示相应的消息框。

03

BeforeDoubleClick 事件

当双击某工作表单元格区域时产生此事件，此事件先于默认的双击操作。Worksheet_BeforeDoubleClick(ByValTarget As Range, Cancel As Boolean)

参数Target代表工作表中所选取的单元格或单元格区域。

参数Cancel设置是否允许默认的操作，缺省值为False。若设置为True，则不允许按照双击单元格方式来输入数据。

示例2: 在双击工作表单元格区域A1:C3中的任意单元格时，会自动为该单元格添加红色作为背景色。

04

SelectionChange事件

当工作表上的选定区域发生改变时，将产生SelectionChange 事件。Worksheet_SelectionChange(ByValTarget As Range)

参数Target代表工作表中所选取的单元格或单元格区域。

示例6: 高亮显示单元格所在的行列

05

Calculate 事件

当工作表被重新计算时触发Worksheet_Calculate()事件。

示例：比较同一产品两个月份的利润。若利润上升，将在月份下面显示向上的红色箭头，如果利润下降，则在月份下面显示向下的绿色箭头。

06

Change事件

当用户更改工作表中的单元格，或外部链接引起单元格的更改时产生Change 事件。

Worksheet_Change(ByValTarget As Range)

参数Target代表工作表中所选取的单元格或单元格区域。

示例：阻止用户修改指定单元格区域的数据。当用户修改工作表中指定单元格区域的数据时，给出提示信息并改回为原数据。