Excel VBA之第六十八课
大家好,本节课我们来学习一下工作表的SelectionChange事件,当工作表上的选取区域发生改变时,将产生此事件,其结构程序如下:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
......
End Sub
我们可以看到,在工作表的SelectionChange事件中,有一个参数Target,它代表的是变化后的Range对象,打个比方,现在当前的活动单元格为A1,那么当用户用鼠标单击B1单元格的时候,这就发生了单元格选取区域的变化,这个Target在这里代表的就是B1单元格。那么根据这个原理,我们可以创造很多实用的小程序了。
下面我用一个例子来说明一下,现在想要实现在B2:B9单元格中点击时就会出现相应的等级并且不及格的字体自动设置为红色的效果。代码如下:
效果如下:
是不是觉得很神奇呢,快快get吧~
赞 (0)