Check cell for comment

How do I evaluate a cell to see if it has a comment in it. I am not looking
to loop throught a comment collection here. I want to select a cell and
return a property value if possible to see if the cell has a comment. Sounds
sillly as you can see whether it has one or not. But I am using it an error
handler.

Thanks

Got it. Thanks anyways.

If ActiveCell.Comment Is Nothing Then
MsgBox ("There isn't a comment in this cell to copy!")
Exit Sub
End If

"ExcelMonkey" wrote:

> How do I evaluate a cell to see if it has a comment in it. I am not looking
> to loop throught a comment collection here. I want to select a cell and
> return a property value if possible to see if the cell has a comment. Sounds
> sillly as you can see whether it has one or not. But I am using it an error
> handler.
>
> Thanks