I was thinking a UDF
or![]()
Function myArray(myRange as Range) as Variant myArray = Application.Transpose(myRange.Column(1).Value) End Function
That last UDF runs into some differences between Mac VBA and Windows VBA, but Variant is the required type for a Mac. (VBA v.5 instead of v.6 ?? )![]()
Function CountingNumbers1to(N as Long) as Variant Dim i as Long, resultArray() as Long ReDim resultArray(1 to N) For i = 1 to N resultArray(i) = i Next i CountingNumbers1to = resultArray End Function
Bookmarks