In my Excel 2003, I have around 30 textbox, which is created by using
the following formula

=EMBED("Forms.TextBox.1","")

I wonder how can I loop them through my VB editor within excel. I have
try using

me.controls
msforms.textbox
OLEObjects

But none of them recognize what I am trying to do. So what is the
syntax for getting all these controls?

Thanks in advance and your help would be greatly appreciated.

Dim obj as OleObject
Dim tbox as MSForms.TextBox
for each obj in ActiveSheet.OleObjects
if typeof obj.Object is MSforms.TextBox then
set tbox = obj.Object
msgbox tbox.Name & " - " & tbox.Value
end if
Next

--
Regards,
Tom Ogilvy


wrote in message
ups.com...
In my Excel 2003, I have around 30 textbox, which is created by using
the following formula

=EMBED("Forms.TextBox.1","")

I wonder how can I loop them through my VB editor within excel. I have
try using

me.controls
msforms.textbox
OLEObjects

But none of them recognize what I am trying to do. So what is the
syntax for getting all these controls?

Thanks in advance and your help would be greatly appreciated.

You can loop through them using the Shapes collection under the particular
Sheet object.
--
http://HelpExcel.com
1-888-INGENIO
1-888-464-3646
x0197758


" wrote:

In my Excel 2003, I have around 30 textbox, which is created by using
the following formula

=EMBED("Forms.TextBox.1","")

I wonder how can I loop them through my VB editor within excel. I have
try using

me.controls
msforms.textbox
OLEObjects

But none of them recognize what I am trying to do. So what is the
syntax for getting all these controls?

Thanks in advance and your help would be greatly appreciated.