Try

Set controls = Sheet1.OLEObjects
for each control in controls.Object
control.value = "Test"
next control


--
---
HTH

Bob


(there's no email, no snail mail, but somewhere should be gmail in my addy)



"NateBuckley" wrote in message
...
Hello I have a larger version of this

Set controls = Sheet1.OLEObjects
for each control in controls
control.value = "Test"
next control


Having a problem where I can't find the property/method to change the
value
of the control object, as it appears a OLEObject does not contain a
method/prop called Value.

Just wondering how I can assign a value to a control like this?

All the controls on my sheet 1 are Control Textboxes, and I'm using Excel
2003.

Thanks for any help you can offer.