如:B3 = B4 + B5,如果选择Change事件,定义Target.Address = B3,当B4或B5发生变化而引起B3的数值变化时,事件不会触发。
这种情况下需要选择的事件为Calculate,当有计算发生时触发。
如下:
Private Sub Worksheet_Calculate()
If Range("B3").Value > 99 ThenMsgBox "Overflow" End If
End Sub
如:B3 = B4 + B5,如果选择Change事件,定义Target.Address = B3,当B4或B5发生变化而引起B3的数值变化时,事件不会触发。
这种情况下需要选择的事件为Calculate,当有计算发生时触发。
如下:
Private Sub Worksheet_Calculate()
If Range("B3").Value > 99 ThenMsgBox "Overflow" End If
End Sub
联系客服