Hi Paul,
You can try something like this.
Function TestVar(Var As Integer)
Dim ttext(20) As String
ttext(1) = "Aaple"
ttext(2) = "banana"
ttext(3) = "carrot"
TestVar = ttext(Var)
End Function
Regards,
Jignesh Parikh.
----- Original Message -----
From: paulschreinerindy
To: ExcelVBA@yahoogroups.com
Sent: Friday, September 30, 2011 5:25 PM
Subject: [ExcelVBA] Indirect Variables
I have a co-worker that has come to me with a question.
I'm pretty sure I've done this in the past, but
I cannot seem to locate it in my 80,000 lines of VBA code!
We have several variables:
Val1 = "apple"
Val2 = "banana"
Val3 = "carrot"
there is another variable that will result in
having the value of one of these variable NAMES.
TestVar = "Val2"
How do we determine the value of the variable
represented by the value of TestVar?
That is: msgbox val(TestVar)
displays: "banana"
(similar to the INDIRECT() function in Excel, but for variables)
Paul
[Non-text portions of this message have been removed]
Be sure to check out TechTrax Ezine for many, free Excel VBA articles! Go here: http://www.mousetrax.com/techtrax to enter the ezine, then search the ARCHIVES for EXCEL VBA.
----------------------------------
Visit our ExcelVBA group home page for more info and support files:
http://groups.yahoo.com/group/ExcelVBA
----------------------------------
More free tutorials and resources available at:
http://www.mousetrax.com
----------------------------------
Tidak ada komentar:
Posting Komentar