How to evaluate string?

I have TextBox1 control on Form.

I want to know how to evaluate string "TextBox1" as object?

What I want is something like this:

objectvar = Evaluate("TextBox1")

I want to pass to objectvar evaluated string "TextBox1" and because TextBox1 is object it should be evaluated as object. How to do that?

Try something like

MsgBox Evaluate(Me.Controls("TextBox1").Text)

You should probably put in some error checking to ensure that the
Text is numeric.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com




"Boban" <[email protected]>
wrote in message
news:[email protected]...
>
> I have TextBox1 control on Form.
>
> I want to know how to evaluate string "TextBox1" as object?
>
> What I want is something like this:
>
> objectvar = Evaluate("TextBox1")
>
> I want to pass to objectvar evaluated string "TextBox1" and
> because
> TextBox1 is object it should be evaluated as object. How to do
> that?
>
>
> --
> Boban
> ------------------------------------------------------------------------
> Boban's Profile:
> http://www.excelforum.com/member.php...o&userid=28560
> View this thread:
> http://www.excelforum.com/showthread...hreadid=482210
>

You didn't understand what I need.

I need evaluation of variable so that evaluation returns reference to some variable.

I want to evaluate string "TextBox1" which is actually object on a form and I need some function (or something) to evaluate that and to return object "TextBox1" to some variable.

Dim objvar as MSForms.Textbox

set objvar = Userform1.Controls("Textbox1")

or
sStr = "TextBox1"
set objvar = Userform1.Controls(sStr)
--
Regards,
Tom Ogilvy

"Boban" <[email protected]> wrote in
message news:[email protected]...
>
> You didn't understand what I need.
>
> I need evaluation of variable so that evaluation returns reference to
> some variable.
>
> I want to evaluate string "TextBox1" which is actually object on a form
> and I need some function (or something) to evaluate that and to return
> object "TextBox1" to some variable.
>
>
> --
> Boban
> ------------------------------------------------------------------------
> Boban's Profile:
http://www.excelforum.com/member.php...o&userid=28560
> View this thread: http://www.excelforum.com/showthread...hreadid=482210
>

Yes, thats what I needed!

Thanks, have a drink on my account!

Originally Posted by Tom Ogilvy

Dim objvar as MSForms.Textbox

set objvar = Userform1.Controls("Textbox1")

or
sStr = "TextBox1"
set objvar = Userform1.Controls(sStr)
--
Regards,
Tom Ogilvy