Thread
:
How to Dim the contents of a variable in running procedure?
View Single Post
#
5
Posted to microsoft.public.excel.misc
Dave Peterson
external usenet poster
Posts: 35,218
How to Dim the contents of a variable in running procedure?
There are some languages that let you build a variable name and use that string
as the variable.
But excel's VBA isn't one of them.
wrote:
BTW,
The solution that you provided, was exactly what I needed and so applied.
When I fooled around with ole' dBase IV code, there were different techniques to address a variable
vs the contents of that variable.
Dave Peterson wrote:
It sounds like you'd want to use this as an array so you could loop through the
formula string???
I think I'd use something like:
dim GapStart() as long
'later determine the number of operators in the formula string and then redim
that array variable.
fCount = 18 'say
redim gapstart(1 to 18)
'Then loop through the string assigning the starting positions to that array.
for iCtr = lbound(gapstart) to ubound(gapstart)
'something that determines that starting point
gapstart(ictr) = iCounter
next ictr
The iCtr that I used counts through the number of elements in that array. Your
iCounter holds the starting points.
Those names would confuse me! I'd use a more meaningful name for the starting
position variable:
dim GapStart() as long
dim iStartingPos as long
dim iCtr as long
dim fCount as long
fCount = 18 'say
redim gapstart(1 to 18)
for iCtr = lbound(gapstart) to ubound(gapstart)
'something that determines that starting point
gapstart(ictr) = iStartingPos
next ictr
=======
wrote:
2003/2007
fCount is a number of "Operators" in a Formula string
iCounter is the InStr() position of each operator in a Formula string
The variable which I wish to initiate is, temporariiy labeled, "Hold".
Hold = "Gap" & fCount & "Start" & "(" & iCounter & ")"
In my context, the contents of "Hold" is Gap4Start(13)
How do I Dim Gap4Start(13) in the midst of a running procedure?
i.e., Dim Gap4Start(13) as Long (So that, ? Gap4Start(13) is 13)
My goal is to be able to "address" each Gap?Start(x) and obtain the contents :
Or put differently: The character position of the start of a "Gap" in the fourth
cell reference in FormulaStr is 13
I hope that I have been clear.
TIA EagleOne
--
Dave Peterson
Reply With Quote
Dave Peterson
View Public Profile
Find all posts by Dave Peterson