Hoe kun je zien of een Cell commentaar heeft?

[Rianneke]

Middels

"Comment = Worksheets("worksheet1").Range(RangeCell).Comment.Text"

Kan ik de waarde van commentaar lezen in VBA, maar hoe kan ik nu bepalen of een cell ook commentaar heeft.

 

[Wigi]

Je zit op het goede spoor, maar je zou het zo kunnen aanpakken:

http://www.mvps.org/dmcritchie/excel/ccomment.htm#hascomment

Wigi

 

[Rianneke]

Het testen op comment via...
"If (Worksheets("worksheet1").Range(RangeCell).Comment Is Nothing) Then... Else... End If"

Was voldoende.
Thanks