更改命名区域(单元格)时如何调用宏

Question

当名为"RE_1"的单元格被更改时，我正在尝试调用名为"RE_environmental"的宏（即它们在单元格中标记 X）。我已经尝试了几种不同的代码变体，包括这两个，但没有任何反应：

[如果我使用确切的单元格位置而不是命名的单元格，则第一个代码确实有效。 --> $E$62]

     Private Sub Worksheet_Change(ByVal Target As Range)
     If Target.Address = "RE_1" Then
     Call RE_environmental
     End If
     End Sub

和

     Private Sub Worksheet_Change(ByVal Target As Range)
     If Range("Name").Select = "RE_1" Then
     Call RE_environmental
     End If
     End Sub

-

-感谢高级，如果您需要更多信息，请告诉我。

Answer 1

使用你的第一个答案，但做这个小的改变：

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = Range("RE_1").Address Then
        Call RE_environmental
    End If
End Sub

简单的语法错误！

编辑：要在单元格为空后停止RE_environmental运行，请将RE_environmental中的代码放入 do-while （不是 isempty（Range（"RE_1"））），只要RE_environmental正在清空"RE_1"。用户将无法在RE_environmental运行时编辑单元格。

Answer 2

如果Target始终是单单元格区域，则可以使用以下内容：

If Target.Address = Range("RE_1").Address Then
    Call RE_environmental
End If

如果Target可以是多单元格范围，请使用以下内容：

If Not Intersect(Target, Range("RE_1")) Is Nothing Then
    Call RE_environmental
End If