如何在Excel VBA中附加文本以进行评论？

Question

我有一个VBA脚本，可以将文本附加到任何单元格的注释，但是它会删除所有注释格式。

我目前的代码就像

一样简单

c.Comment.text "something to append" & " " & c.Comment.text

是否可以完成这项工作，但不会丢失所有评论的格式。

Answer 1

如记录所示，Text方法has three parameters 使用全部三个来保留现有文本：

c.Comment.Text "something to append ", 1, False

Answer 2

在使用Characters函数时要非常小心，因为Excel中有一些古老的错误，而且我发现如果与大型工作簿一起使用，这会导致不稳定和无法复制的崩溃。