COM（组件对象模型）在MS Office中插入注释

我用AHK和COM在MicrosoftWord中做了很多事情。例如，我已经能够编写一个脚本来查找、替换或突出显示单词。但是，我还没有找到关于如何使用COM在office中创建或删除评论的文档

---

我知道这是关于如何在C#和VBA中添加注释的文档，但我如何使用COM来添加注释。

当我回答这个问题时，当时无法测试代码。我对其进行了编辑，以更好地反映您的要求并演示一个工作示例

创建COM对象Word应用程序

创建一个新文档

在文档中添加文本

现在让我们添加我们的评论

使我们的文件可见

设置热键以删除注释。（Windows键+F1）

oWord := ComObjCreate("Word.Application")

oWord.Documents.Add

oWord.Selection.TypeText("AutoHotkey is a pretty cool scripting language.")

oWord.ActiveDocument.Comments.Add(oWord.ActiveDocument.Paragraphs[1].Range
                                  , "This is a very true statement!.")

oWord.Visible := 1 

#F1::oWord.ActiveDocument.Comments(1).Delete