Hi,

This will replace current contents with "My Text".
You will need to adjust how you reference the control. The examples use name
and index.

Activesheet.shapes(1).textframe.characters.text="M y Text"
or
Activesheet.shapes("Text Box 1").textframe.characters.text="My Text"

Cheers
Andy
--

Andy Pope, Microsoft MVP - Excel
http://www.andypope.info
"Nigel RS" wrote in message
...
How do I access the contents of a Text box (that is a drawing object shape
on
a worksheet).

For example I wish to manipulate the text a user has typed into the box,
and
edit/change the contents of the box.

I cannot find a property such a Text or Value, that I use for UserForm
controls.

Thanks