Hi,

I had an issue with a spreadsheet where a number of cells had comments visible which caused the file to be really hard to use.

I wrote a small macro to deal with it, could be useful.

It works by selecting the range where you want the comments to be hidden and then just run the macro (from Development tab).




Sub Macro1()

Dim cell As Range
Dim cmt As Comment


For Each cell In Selection
Set cmt = cell.Comment
If cmt Is Nothing Then

ElseIf cell.Comment.Visible = True Then

cell.Comment.Visible = False

End If

Next cell

End Sub