Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
是否有Excel注释激活或选择事件?_Excel_Vba - Fatal编程技术网

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

是否有Excel注释激活或选择事件?,excel,vba,Excel,Vba,我正在使用Excel注释来存储一些信息,我希望允许用户使用表单编辑这些信息。当用户选择注释时,我想用注释中包含的文本预先填充表单。当用户使用SheetSelectionChange事件选择带有红色选项卡的单元格时(当注释隐藏时),我可以这样做。但是,当显示注释并且用户在注释框内单击时,有没有办法做到这一点 我在帮助中找不到任何与评论相关的事件。是否有任何评论事件暴露于VBA?或者我可以通过一些单元格或工作表事件来实现这一点?我尝试在SheetSelectionChange事件中放置一个MsgBo

我正在使用Excel注释来存储一些信息,我希望允许用户使用表单编辑这些信息。当用户选择注释时,我想用注释中包含的文本预先填充表单。当用户使用SheetSelectionChange事件选择带有红色选项卡的单元格时(当注释隐藏时),我可以这样做。但是,当显示注释并且用户在注释框内单击时,有没有办法做到这一点

我在帮助中找不到任何与评论相关的事件。是否有任何评论事件暴露于VBA?或者我可以通过一些单元格或工作表事件来实现这一点?我尝试在SheetSelectionChange事件中放置一个MsgBox以显示Target.ActiveCell,但是当我选择一条注释时,我没有收到响应,因此在选择注释时,它似乎与工作表没有关联


提前感谢您提供的任何提示。

我不相信会有任何评论活动

但是,您可以在工作表上使用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

与大多数形状一样,注释不会对SelectionChange事件产生影响。与许多形状不同,您甚至不能为注释指定宏。谢谢您的建议。是的,如果用户在隐藏注释时单击包含注释的单元格,则此操作有效。我让那部分工作。但是,当用户显示注释并在注释框内单击时,似乎不会触发SelectionChange事件,因为他们实际上并不是在工作表上选择单元格。我将MsgBox语句放在SelectionChange中,当我在注释框中单击时,它不会显示。但是Excel必须知道当您在注释中单击时,注释属于哪个单元格,因为它在状态栏中显示该单元格。但是没有与之关联的事件。。。你必须以另一种方式触发事件。