BeforeSelRangeChange

选择不同区域前执行，也就是表的TopRow、LeftCol、BottomRow、RightCol等属性发生变化前执行。

e参数属性：

Table：   引发事件的Table
OldRange：CellRange类型，表示操作前选定的区域
NewRange: CellRange类型，表示操作后选定的区域
Cancel：  逻辑型，设为True取消操作

示例一

例如希望用户无法选择某一列，以免用户复制该列的内容，在BeforeSelRangeChange时间中设置如下代码即可：

'获得机密列的位置，保存到变量c中
Dim c As integer = e.Table.Cols("机密").Index
'判断即将选定的区域是否包括机密列
If e.NewRange.LeftCol <= c And e.NewRange.RightCol >= c Then
    e.Cancel = True '如果是，取消操作。
End If