excel中VBA删除工作簿中的所有批注
用下面的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”的宏名,并单击“执行”按钮。
版权声明
本文仅代表作者观点,不代表本站立场。
本站资源均来自互联网整理,版权归原作者所有,切勿用作非法使用和未经授权的商用,因此带来的法律风险与本站无关。
- 上一篇: Excel中有关打印预览的一些VBA代码
- 下一篇: excel利用VBA批量修改工作表名称
发表评论