Message Box a comment in the activecell

[Deuce Bucksman]

Hello,

I just need a simple VBA procedure that will message box the comment in the activecell (if there is one). Below is my feeble attempt. Any assistance would be greatly appreciated. Thanks!

sub macrotest()
msgbox activecell.comment
end sub

 

[VoG]

Try

Sub macrotest()
On Error Resume Next
MsgBox ActiveCell.Comment.Text
On Error GoTo 0
End Sub