Execute a string

[jelliott]

In VBS you can execute a string to run as code.
Here is an example:

strTest = "msgbox " & chr(34) & "Test." & chr(34)
execute strTest

I am trying to make a AD interface in excel 2007(per a user request).
I would like to make it dynamic in that users can select what attributes they want to see.

So, for example they can enter in cn (which returns the user's name) as one of the attributes they want. A simplified example of what I would like to do is:

strAttribute = Sheets("Control").Range("a1")
execute "strUserAttribute = objUser." & strAttribute
msgbox strUserAttribute

Since execute isn't part of VBA, how do I do this please?
Thanks,
-Jeremy

[Siddharth Rout]

Is this what you are trying to do?

strAttribute = Sheets("Control").Range("a1")
strUserAttribute = objUser & strAttribute
MsgBox strUserAttribute

[jelliott]

Is this what you are trying to do?

strAttribute = Sheets("Control").Range("a1")
strUserAttribute = objUser & strAttribute
MsgBox strUserAttribute

Unfortunately that is not it.

In your example, if objUser was a variable than that would set the variable strUserAttribute to equal what ever values objUser and strAttribute were textually. For example of objUser had a value of “something” and strAttribute had a value of “cn”, then strUserAttribute would have a value of “somethingcn”.

Since objUser is not a variable and is an object, it just would error out. I am not trying to get the text, objUser.cn, I am trying to get the value that objUser.cn represents. I can just type in the code myself, objUser.cn, but it means that the users off my spreadsheet will not have the freedom of adding any Attribute they like without having to edit the code themselves.
-Jeremy