What VBA statement(s) can I use to determine whether or not a specific cell
has a comment attached to it?

Please reply directly to

Thanks

Al Baker

Al, here is one way,

Sub Check_For_Comment()
Dim cm As Comment

Set cm = ActiveCell.Comment
If cm Is Nothing Then
MsgBox "No Comment In Cell " & Selection.Address, , "Comment ?"
ElseIf Not cm Is Nothing Then
MsgBox "Comment In Cell " & Selection.Address, , "Comment ?"
End If
End Sub


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"Al Baker" <Al wrote in message
...
What VBA statement(s) can I use to determine whether or not a specific
cell
has a comment attached to it?

Please reply directly to

Thanks

Al Baker