用下面的VBA代碼可以同時(shí)刪除工作簿中所有工作表中的批注：

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.關(guān)閉VBA編輯器，按快捷鍵Alt+F8，打開“宏”對(duì)話框，選擇包含“RemoveAllComments”的宏名，并單擊“執(zhí)行”按鈕。