如何对一系列单元格使用 Excel VBA "Worksheet_Calculate" 函数

Question

我希望我的宏仅在指定范围内的计算单元格发生变化时激活。目前，只要计算 sheet 上的任何单元格，宏就会激活。

例如，我将如何更改以下代码，以便 Macro1 仅在 Range(A1:A5) 中的单元格因计算而更改时激活，而不是在重新计算任何其他范围内的单元格时激活？任何指导将不胜感激。

Private Sub Worksheet_Calculate()
    Macro1
End Sub

Answer 1

应该这样做...

Private Sub Worksheet_Calculate()
    Static last, test
    
    test = [sum(a1:a5)]
    
    If Not IsError(test) Then
        If last <> test Then
            last = test
            Macro1
        End If
    End If
End Sub

如何对一系列单元格使用 Excel VBA "Worksheet_Calculate" 函数

How to use Excel VBA "Worksheet_Calculate" function for a range of cells

excel

vba