如何引用Excel注释中突出显示的文本？

我有一个宏，当我按下ctrl-d时运行。它应该将所选文本变为绿色，并使其删除线

但是，我希望它应用于注释中的选定文本，而不是单元格本身中的文本

如果我说：

Sub TaskFinished()
    With Selection.Font
        .Strikethrough = True
        .Color = Green
    End With
    MsgBox ("Ran macro!")
End Sub

它适用于单元格中的文本（颜色不起作用，但我可以在以后解决），但只有在选中单元格时才起作用（与处于F2编辑模式相反）

---

消息框仅在我未处于编辑模式时出现。宏似乎根本无法在编辑模式下触发？

请尝试以下代码：

Sub TaskFinished()
   With Selection.Font
    .Strikethrough = True
    .Color = rgbGreen
  End With
MsgBox ("Ran macro!")
End Sub

---

'使用rgb进行颜色编码

请尝试以下代码：

Sub TaskFinished()
   With Selection.Font
    .Strikethrough = True
    .Color = rgbGreen
  End With
MsgBox ("Ran macro!")
End Sub

---

'使用rgb进行颜色编码

为什么不发布完整的代码。您的示例毫无意义。请参阅：但是，如何获取他在编辑注释时突出显示的文本块的大小？您无法在编辑模式下运行Vba。FWIW，新（ish）功能允许Vba在注释编辑器打开时运行。但是我找不到与编辑器交互的方法，也许其他人可以，为什么不发布完整的代码呢。您的示例毫无意义。请参阅：但是，如何获取他在编辑注释时突出显示的文本块的大小？您无法在编辑模式下运行Vba。FWIW，新（ish）功能允许Vba在注释编辑器打开时运行。但是我找不到与编辑互动的方法，也许其他人可以