在Excel中,在为上司/管理人员准备报告时,我们倾向于插入注释,以使其他人知道任务的状态。

注释基本上用于内部目的。在本文中,我们将学习如何使用宏删除Excel中的所有注释。

问题):我想应用一个VBA代码,该代码将从工作簿中删除所有注释。

我在家里使用Excel 2003版本,在办公室使用Excel 2010版本。

我有一个在删除Excel 2010注释时能完美运行的代码,但无法删除Excel 2003注释。

我们需要执行以下步骤:

单击“开发人员”选项卡。从“代码”组中,选择“ Visual Basic”

image 1

  • 单击插入,然后单击模块

image 2

这将创建新模块在标准模块中输入以下代码以下代码与Excel 2007,Excel 2010和Excel 2013版本兼容

子Remove_Comments_After2007()

‘从Excel 2007工作簿中删除注释

ActiveWorkbook.RemoveDocumentInformation(xlRDIComments)

结束子

以下代码与Excel 2003版本兼容

子Remove_Comments_2003()

‘从Excel 2003工作簿中删除注释

昏暗的wksAs工作表

Dim cmnt作为注释

对于每个wksInActiveWorkbook.Sheets

对于每个cmntInwks.Comments

cmnt。删除

下一个cmnt

下一个

结束子

image 3

要运行宏,我们将按ALT + F8 *快捷键打开“宏”窗口并选择宏。

  • 所有评论将被删除。

这样,我们可以根据使用的版本删除Excel注释。

download

Excel