VBA - checking for existance of a property

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

B - 24 May 2008 16:30 GMT

Hi All,

I'm making a function that works with the Range.Comment object.

There's Comment.Text, but if there's nothing in it, it just errors
out.

How to check if .Text exists or not before attempting to read from it?

Thanks

Reply to this Message

Bernie Deitrick - 24 May 2008 16:40 GMT

B,

Use the error to your advantage:

Sub Test()
Dim myT As String

On Error Resume Next
myT = "No Comment!"
myT = ActiveCell.Comment.Text
MsgBox IIf(myT = "", "Comment is blank", myT)

End Sub

> Hi All,
>
[quoted text clipped - 6 lines]
>
> Thanks

Reply to this Message

B - 24 May 2008 17:03 GMT

On May 25, 1:40 am, "Bernie Deitrick" <deitbe @ consumer dot org>
wrote:

> B,
>
[quoted text clipped - 20 lines]
>
> > Thanks

Thanks

Reply to this Message