Vba syntax question: Passing variables into Function, returning array of longs

[SkiHood]

Something like...

dim retArray (0 to 1) as Long

reDim retArray ( 0 to 1)
retArray = doSomething(wSheet, searchVal, rngStart, rngEnd) (

Function doSomething(w, srch, begin, end) ()

retArray(0) = 100,000
retArray(1) = 5

doSomething = retArray

End function

The psuedo-code above is presented only to hopefully illustrate the question.

thanks in advance!

Ski

 

[jscranton]

when you pass the four variable to the function, what are you doing with them?

 

[jscranton]

You will need to pass your variables to the function. Use them as needed and then set your retArray to your function Array.

Sub arrayTest()
Dim retArray() As Long
retArray = doSomething(wSheet, searchhVal, rngStart, rngEnd)

End Sub

Function doSomething(w As Worksheet, srch As String, beginRange As Range, endRange As Range)
Dim newArray() As Long
'Here you would use your passed variable to do something to the array (newArray) in your function

'Then set retArray to newArray
retArray = newArray
End Function

 

[RoryA]

A bit vague () but something like this:

Sub testing()
   Dim wSheet, searchVal, rngStart, rngEnd
   Dim retArray()                  As Long

   retArray = doSomething(wSheet, searchVal, rngStart, rngEnd)
   MsgBox retArray(0)
   MsgBox retArray(1)
End Sub
Function doSomething(w, srch, begin, lEnd) As Long()
   Dim tempArray(0 To 1)           As Long
   
   tempArray(0) = 100000
   tempArray(1) = 5

   doSomething = tempArray

End Function

 

[jscranton]

Rory's code is correct (and almost identical to mine) but note that he set the function to the tempArray (newArray in my example) which is correct.

 

[SkiHood]

ah... found my issue. The variable assigned to receieve the result of the function has to be a variant, not an array!

Dim retArray As Variant

retArray = doSomething(wSheet, searchVal, rngStart, rngEnd)

Seems to have done the trick - at least I am seeing believable results while single stepping

 

[RoryA]

No - it can be an array (as in my code) but it must be dynamic and of the same type as the function.

 

[SkiHood]

Ah... Silly me but how do I declare a dynamic array vs static ? I'm guessing but I suppose that my variant type is to be avoided do the the lack of typecasting ?

 

[RoryA]

dim retArray() as long

as opposed to

dim retArray(0 to 1) as long