如何一次性删除工作表中的所有批注呢？（7种方法）

楼主 0Mouse	Q：如何一次性删除工作表中的所有批注呢？ A：以下7种方法均可批量删除工作表内的所有批注。方法一：定位后删除【操作步骤】单击工作表左上角全选按钮，按下F5键，在弹出的“定位”对话框中，单击“定位条件”按钮，在弹出的“定位条件”对话框中直接单击“确定”按钮（快捷键：Ctrl+Shift+O），将光标指向任意一个含有批注的单元格，单击鼠标右键，在弹出的快捷菜单中，选择“删除批注”菜单项。方法二：查找后删除【操作步骤】按下组合键Ctrl+F，在弹出的“查找和替换”对话框中，在“查找内容”输入框内输入“”，单击“选项”按钮，再单击“查找范围”右侧的下拉按钮，在下拉列表中选择“批注”，单击“查找全部”按钮，按下组合键Ctrl+A，按下Esc退出“查找和替换”对话框，将光标指向任意一个含有批注的单元格，单击鼠标右键，在弹出的快捷菜单中，选择“删除批注”菜单项。方法三：全选后直接删除【操作步骤】单击工作表左上角全选按钮，单击鼠标右键，在弹出的快捷菜单中，选择“删除批注”菜单项。注：通过工作表标签选择多张工作表后再执行本法操作即可删除所选工作表中的所有批注。方法四：借助“审阅”选项卡【操作步骤】单击工作表左上角全选按钮，单击“审阅”选项卡上“批注”组中的“删除”命令（图1）。图1：“审阅”选项卡上“批注”组中的“删除”命令注：通过工作表标签选择多张工作表后再执行本法操作即可删除所选工作表中的所有批注。方法五：利用“文档检查器” 【操作步骤】单击左上角“文件”，在打开的页面中单击“检查问题”按钮，在下拉列表中选择“检查文档”（图2），在弹出“文档检查器”对话框（图3）中勾选“批注和注释”复选框，单击“检查”按钮，再单击右上角“全部删除”按钮。图2：“检查文档”菜单项图3：“文档检查器”对话框注：如果已将工作簿另存为共享工作簿，则无法删除批注。若要从共享工作簿中删除批注，请先复制该工作簿，然后再取消对它的共享。采用本法将删除整个工作簿的所有批注。方法六：vba 【操作步骤】按下组合键Alt+F11，单击“插入”菜单项，在下拉列表中选择“模块”命令，在产生的窗格中复制以下代码，按下F5键。 Sub ClearCmts() Cells.ClearComments End Sub 注：如果要删除工作簿各个工作表中的所有批注，可以使用以下代码： Sub ClearCmts() Dim cmt As Comment, sht As Worksheet For Each sht In ActiveWorkbook.Worksheets For Each cmt In sht.Comments cmt.Delete Next Next End Sub 方法七：修改文件类型，删除相应批注文件。（天南地北提供，仅适用于2007和2010版）将Excel文件扩展名由xlsx改为zip或者rar后，双击打开压缩文件，再双击XL文件夹，将里面的comments1.xml文件（图4）删除，然后将扩展名改回xlsx。（如果删除XL文件夹中所有的comments.xml文件即删除了整个工作簿内的所有批注。图4：工作表批注对应的comments*.xml文件
2楼滴水穿石	这么多种方法！我平时用的最多的是审阅——删除~
3楼天南地北	再提供一种方法，07或者10版本，将xlsx扩展名更改为ZIP或者RAR，双击打开压缩文件，找到XL下面的文件夹，删除comments1.xml文件，然后将扩展名更改回来为XLSX格式！
4楼 0Mouse	曾经用过此法提取背景图片，还真没发现还可以删除批注，学习了！
5楼 lrlxxqxa	太棒了，学习了！
6楼 rabbitllu	直接打开该文件，还可以通过查找替换，批量修改批注
7楼 rabbitllu	07没有找到呢
8楼 pcxangle	一个批注就有这么多的方法，长见识了
9楼 0Mouse	xml是网页文件，还能批量替换？能否录个动画瞅瞅？
10楼天南地北	以文本文件打开就可以查找替换了！替换后保存，虫子有帖子说明过！ Excel2010如何批量修改批注内容？ http://www.exceltip.net/thread-5979-1-1.html
11楼 0Mouse	谢谢指引！“查看源文件”！
12楼 L_Yang136	谢谢各位版主，学习了。
13楼玉丫头	这里讲的是工作表中的所有批注如果要批量删除工作簿中的所有批注，好像只能用到VBA吧？
14楼玉丫头	方法五就可以删除整个工作簿中的批注。
15楼 0Mouse	执行删除操作之前，通过工作表标签选中所有工作表即可。
16楼玉丫头	这个是指哪一种方法的？
17楼 0Mouse	指的是“方法三：全选后直接删除”。除了你说的方法五外，方法七里删除压缩包里所有commnet*.xml文件也就删除整个工作簿里的所有批注了。另外，就是使用vba代码了。 Sub ClearCmts() Dim cmt As Comment, sht As Worksheet For Each sht In ActiveWorkbook.Worksheets For Each cmt In sht.Comments cmt.Delete Next Next End Sub
18楼 vanesshuan	看了前面2个会用就可以
19楼 aichong	也可以这样：第一步：Ctrl+A（有些表格可跳过这一步）第二步：Ctrl+Shift+O 第三步：将光标放到任意一个有批注的单元格上，右击选择“删除批注”
20楼 qinhuan66	好呀值得学习
21楼 CAIHONGFEI	一个小小的，批注，可以有这么多方法呀！真是感谢，学习了！
22楼 ☆爱咋咋地☆	不错，学习了。
23楼冬冬WarmUp	太棒了，学习了！