Delete Comments :

If You want to Delete All Comments From a Worksheet , Try this :


Sub delComment()
Dim cmt As Comment
For Each cmt In ActiveSheet.Comments
cmt.Delete
Next cmt
End Sub