当用户更改工作表中的单元格,或外部链接引起单元格的更改时产生此事件。
Private Sub Worksheet_Change(ByVal Target As Range)
Target 更改的区域。可以是多个单元格。
重新计算引起的单元格更改不触发本事件。可使用 Calculate 事件俘获工作表重新计算操作。
本示例将更改的单元格的颜色设为蓝色。
Private Sub Worksheet_Change(ByVal Target as Range)
Target.Font.ColorIndex = 5
End Sub