SelectionSet.Item(1).TextString

[geotis]

I have one text object in my selection set.  I'm trying to use the method shown in the title to obtain the text string.  The Locals Window correctly reports the text string in Item1.  However, I get the error message "Invalid argument index in Item".

Can someone tell me the proper syntax to use for this?

Thanks

[Ed__Jobe]

Cast the item to an AcadText entity. Then use it's TextString property. You should also check the ss for a count > 0, and test the item to be sure its a text ent.

Dim oTextEnt As AcadText

Set oTextEnt = ss.Item(1)

MsgBox "The text says: " & oTextEnt.TextString

[norman.yuan]

---

@geotis wrote:

I have one text object in my selection set. 

---

It is not very clear whether the SelectionSet only have one item and the item is a Text object, or the SelectionSet have multiple objects and one of it (Item(1), the SECOND one in the selectionset) is Text object? Your code ONLY works in the the latter case.

If the selectionset ONLY has one object, then the index in the Item(index) should be 0, not 1.