有没有一种方法可以在Excel中检索评论的单元格地址?

5
我正在编写一个简短的宏来操作Excel中的一些注释。有一种方法可以通过Excel中的注释对象找到我的活动工作表中注释单元格的地址/位置吗?如果没有,是否有任何聪明的变通方法可以给我相同的结果?
下面是我尝试实现的一些示例伪代码:
dim wb as Workbook
dim ws as worksheet
dim cmt as Comment

set wb = ActiveWorkbook

for each ws in wb.sheets
    for each cmt in ws.comments
        debug.print cmt.address ' Pseudo code
    next cmt
next ws
1个回答

6

请尝试:

Dim wb As Workbook
Dim ws As Worksheet
Dim cmt As Comment

Set wb = ActiveWorkbook

For Each ws In wb.Sheets
    For Each cmt In ws.Comments
        'Debug.Print cmt.Address ' Pseudo code
        Debug.Print cmt.Parent.Address
    Next cmt
Next ws

提示:.parent返回的是评论对象的父级对象,在这种情况下,父级对象将是单元格。


当然,cmt.Parent.Rowcmt.Parent.Column会给你单独的行和列号码(例如,F列为6)。 - AjV Jsy

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接