Copy this UDF to a general module in your workbook.

Function IsComment(Cell)
Set cmt = Cell.Comment
If Not cmt Is Nothing Then
IsComment = True
End If
End Function

In CFFormula is: =IsComment(A1)

Format to a nice color from Pattern


Gord Dibben MS Excel MVP

On Tue, 15 Sep 2009 20:43:21 -0700 (PDT), Carter
wrote:

Hi,
I would like to learn if there is way of using a formula to apply
conditional formatting only to cells that have comments attached to
them. I have searched for an answer, but haven't found one yet.
Thanks.