How do I retrieve the text of a cell comment

Question

I find lots of examples for creating but none for retrieving the text of a cell comment. Am I missing something obvious?

Answer 1

Range.Comment.Text seems to work without any problem here...

(e. g. if not ActiveCell.Comment is nothing then debug.print ActiveCell.Comment.Text)

Answer 2

Try going for:

Dim comtext as string

If ActiveCell.Comment Is Nothing Then
        comtext = ""
        Else
        comtext = ActiveCell.Comment.Text
        End If

As for me, if you want to paste comment text as other cell value you might need to use:

Selection.ClearFormats

since sometimes comment text which you pasted or set cell value might be invisible at first.

PS. This is my first post ever on this side, so I've just started learning the ropes.