Sub Remove_Comments_From_Entire_Workbook()
'This macro loops through the worksheets and delets all of the comments contained in the workbook
Dim wsheet As Worksheet
Dim cment As Comment
For Each wsheet In ActiveWorkbook.Worksheets
For Each cment In wsheet.Comments
cment.Delete
Next
Next
End Sub