VBA删除工作簿中的所有批注

2025-12-22 10:39 来源：学会计阅读量：330

导读：用下面的VBA代码可以同时删除工作簿中所有工作表中的批注： 1.按Alt+F11，打开VBA编辑器。 2.在代码窗口中输入下列代码 Sub RemoveAllComments() Dim sht As Worksheet Dim cmt As Comment For Each sht In Ac

用下面的VBA代码可以同时删除工作簿中所有工作表中的批注：

1.按Alt+F11，打开VBA编辑器。

2.在代码窗口中输入下列代码

    Sub RemoveAllComments()
    Dim sht As Worksheet
    Dim cmt As Comment
    For Each sht In ActiveWorkbook.Worksheets
      For Each cmt In sht.Comments
        cmt.Delete
      Next
    Next
    End Sub

3.关闭VBA编辑器，按快捷键Alt+F8，打开“宏”对话框，选择包含“RemoveAllComments”的宏名，并单击“执行”按钮。

上一篇：学习老会计的装订手法
下一篇：国务院:要切实落实简政减税降费措施