是否有Excel注释激活或select事件?

我正在使用Excel注释来存储一些我希望允许用户使用表单进行编辑的信息。 当用户select评论时,我想要预先使用评论中包含的文本填充表单。 当用户使用SheetSelectionChange事件select具有红色选项卡的单元格(隐藏注释时)时,可以执行此操作。 但有没有办法做到这一点时,显示的评论和用户点击评论框内?

在帮助中找不到与评论相关的任何事件。 是否有评论事件暴露给VBA? 或者我可以做一些单元格或表单事件? 我试图在SheetSelectionChange事件中放置一个MsgBox来显示Target.ActiveCell,但是当我select一个评论时,我没有得到一个响应,所以它看起来像select一个评论时,它不与一个工作表相关联。

提前感谢您的任何提示。

我不相信有任何评论的事件。

但是,您可以在工作表上使用SelectionChange事件:

Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not (Target.Comment Is Nothing) Then MsgBox Target.Comment.Text End Sub 

要在您的表单中使用:

 Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not (Target.Comment Is Nothing) Then frmYourForm.Show frmYourForm.txtComments = Target.Comment.Text End If End Sub