获取已更改单元格的地址

Question

我试图在任何dde链接的单元格值发生变化时触发宏（取决于单元格地址）。

我尝试了Workbook.SetLinkOnData和Worksheet_Calculate事件（使用虚拟公式来触发事件），但问题是它们都没有返回更新的单元格的地址。

那么有没有办法让更新的单元格的地址与我的宏一起使用？

这是我的宏

Public Sub UpdateCell (Byval strTargetAddress as String)
    'Some code
End Sub

提前感谢你。

Answer 1

如何使用工作表更改事件：

Private Sub Worksheet_Change(ByVal Target As Range)
    'MsgBox Target.Address
    Call UpdateCell (Target.Address)
End Sub

或者，如果您正在寻找一个公式，那么这样做：

Private Sub Worksheet_Calculate()
    If Sheet1.Range("A1").Value = "Yes" Then Call UpdateCell("A1")
End Sub