excel - 如果单元格发生变化，请调用 Sub

Question

如果某个单元格发生变化，我想调用一个 Sub。使用下面的代码，这就像单元格中有东西一样工作。

Private Sub Worksheet_Change(ByVal Target As Range) If Target = Range("A1") Or Target = Range("A2") Then Call "Name of Sub" End Sub

但是，如果单元格“A1”或“A2”中没有任何内容，我会遇到问题。任何人的想法，如何解决？

标签： excelvbacall

Answer 1

这已经是vba的一种设计模式：

Private Sub Worksheet_Change(ByVal Target As Range)
    If (Not Intersect(Target, Range("A1")) Is Nothing) Or (Not Intersect(Target, Range("A2")) Is Nothing) Then
        Debug.Print "HERE"
    End If
End Sub

intersect 检查是否有任何单元格Target是A1或A2。