Inputbox - Dynamic Array?
there was an illustration in the code:
For j = LBound(varr) To UBound(varr)
Debug.Print j, varr(j)
Next
Debug.print goes to the immediate window, so make it visible in the vbe
(View=Immediate Window)
unless you mean something besides looking at the values stored in the array
when you say call the data.
--
Regards,
Tom Ogilvy
"Alex" wrote in message
...
Thanks Tom!!!
One last thing....
How would I call the data in the array?
"Tom Ogilvy" wrote:
Sub CCCC()
Dim varr()
Dim i as long, j as long, res as variant
res = InputBox("Enter value for 1st element")
i = 0
Do While res < ""
ReDim Preserve varr(0 To i)
varr(UBound(varr)) = res
i = i + 1
res = InputBox("Enter value for " & i + 1 & " element" & _
vbNewLine & " hit cancel to stop entry")
Loop
For j = LBound(varr) To UBound(varr)
Debug.Print j, varr(j)
Next
End Sub
--
Regards,
Tom Ogilvy
"Alex" wrote in message
...
Can I use a input box to load data into a dynamic array?
Example code, if you can please.
THANK YOU!!
--
Jack of all trades... master of none..
|