Excel VBA 显示隐藏注释

在 Excel 中，注释是一种很方便的方式来对单元格进行解释和描述。然而有时候需要一次性隐藏或显示所有注释。在 VBA 中可以通过几行代码来实现这个功能。

显示注释

Sub 显示注释()
    ' 循环遍历工作表中的所有注释
    For Each comment In ActiveSheet.Comments
        comment.Visible = True ' 设置可见性为 True
    Next comment
End Sub

隐藏注释

Sub 隐藏注释()
    ' 循环遍历工作表中的所有注释
    For Each comment In ActiveSheet.Comments
        comment.Visible = False ' 设置可见性为 False
    Next comment
End Sub

这些代码很简单，首先利用 For Each 循环遍历当前激活工作表中的所有注释。然后通过 Visible 属性设置注释的显示或隐藏。在 显示注释 子程序中设置 Visible 属性为 True，在 隐藏注释 子程序中设置为 False。

以上就是 Excel VBA 显示隐藏注释的简单介绍。