Comment 对象

         
Range
Comments (Comment)

代表一条单元格批注。Comment 对象是 Comments 集合的成员。

Comment 对象的的用法

可用 Comment 属性返回一个 Comment 对象。下例对 E5 单元格的批注文字进行更改。

Worksheets(1).Range("E5").Comment.Text "reviewed on " & Date

使用 Comments(index) 可返回 Comments 集合中的单条批注,其中 index 为批注号。下例隐藏第一张工作表中的批注二。

Worksheets(1).Comments(2).Visible = False

可用 AddComment 方法为一个区域添加批注。下例为第一张工作表的 E5 单元格添加批注。

With Worksheets(1).Range("e5").AddComment
    .Visible = False
    .Text "reviewed on " & Date
End With