(急)关于Excel中VBA函数Worksheet_Change的问题
2017-10-23
展开全部
Change 事件
当用户更改工作表中的单元格,或外部链接引起单元格的更改时产生此事件。
Private Sub Worksheet_Change(ByVal Target As Range)
Target 更改的区域。可以是多个单元格。
重新计算引起的单元格更改不触发本事件。
示例:
当工作表区域Columns(“A:E”)内值发生改变时,触发工作表Change事件,撤消操作。
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Column <= 4 Then
'停止响应事件
Application.EnableEvents = False
'撤消上一操作
Application.Undo
Application.EnableEvents = True
End If
End With
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询