Hi,

Am Thu, 5 Feb 2015 09:55:23 +0000 schrieb davidman:

Is there a way to check if a cell has a comment which contains a
string?

try:

Sub CommentCheck()
With Range("A1")
If Not .Comment Is Nothing And _
InStr(.Comment.Text, "MyString") Then
'Do stuff
End If
End With
End Sub


Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional