如何监视单元格批注是否变化

jiangweifujian

如题,vba的Event事件里只有监视单元格值是否变化,无法监视批注是否变化,是否可以自定义函数来实现?

比如A1单元格,批注发生变化时,显示"批注已更新"

鑫尼达

在 VBA 中，似乎没有直接的事件可以监视批注的更改。不过，你可以通过使用 Worksheet_SelectionChange 事件来实现该功能。该事件在选定单元格发生更改时触发。

下面是一个示例代码，可以监视单元格 A1 批注的更改：

```
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$A$1" Then
        If Not Target.Comment Is Nothing Then
            MsgBox "批注已更新"
        End If
    End If
End Sub
```

在上面的代码中，我们使用了 Target.Comment 属性来检查单元格 A1 是否有批注。如果有批注，则显示一条消息框，指示批注已更新。

你可以将这段代码放置在你的工作簿的 VBA 代码模块中。当单元格 A1 中的批注发生更改时，会自动触发该事件，并显示相应的消息框。

jiangweifujian

鑫尼达 发表于 2023-4-21 09:13
在 VBA 中，似乎没有直接的事件可以监视批注的更改。不过，你可以通过使用 Worksheet_SelectionChange 事件 ...

谢谢,其实我不止要看A1单元格,只是举例,如果循环一个个看的话,还是比较费时的.

jiangweifujian

鑫尼达 发表于 2023-4-21 09:13
在 VBA 中，似乎没有直接的事件可以监视批注的更改。不过，你可以通过使用 Worksheet_SelectionChange 事件 ...

谢谢,其实我不止要看A1单元格,只是举例,如果循环一个个看的话,还是比较费时的.

鑫尼达

jiangweifujian 发表于 2023-4-24 08:59
谢谢,其实我不止要看A1单元格,只是举例,如果循环一个个看的话,还是比较费时的.

代码也只是举例啊,解决的是关键问题点.需要批量循环什么的自己改代码就好了