Get 1D Array using Evaluate

YasserKhalil
PlatinumLounger
Posts: 4911
Joined: 31 Aug 2016, 09:02

Get 1D Array using Evaluate

Post by YasserKhalil »

Hello everyone

I have this simple lines

Code: Select all

Dim x as Integer
x=4
a = Evaluate("ROW(1:" & x & ")")


The code constructs an array (2D array) .. Is there a trick to get 1D Array using Evaluate?

** Posted here too
https://chandoo.org/forum/threads/get-1 ... ate.42525/" onclick="window.open(this.href);return false;
Last edited by YasserKhalil on 06 Sep 2019, 12:54, edited 1 time in total.

User avatar
HansV
Administrator
Posts: 78236
Joined: 16 Jan 2010, 00:14
Status: Microsoft MVP
Location: Wageningen, The Netherlands

Re: Get 1D Array using Evaluate

Post by HansV »

I can't think of a way to do that.
Best wishes,
Hans

YasserKhalil
PlatinumLounger
Posts: 4911
Joined: 31 Aug 2016, 09:02

Re: Get 1D Array using Evaluate

Post by YasserKhalil »

I tried something like that but doesn't work for me

Code: Select all

a = Application.Index(Evaluate("ROW(1:" & x & ")"), 0)
May this be a clue

YasserKhalil
PlatinumLounger
Posts: 4911
Joined: 31 Aug 2016, 09:02

Re: Get 1D Array using Evaluate

Post by YasserKhalil »

Solved at post #9 at chandoo link

Code: Select all

a = Evaluate("COLUMN(" & [A1].Resize(, x).Address & ")")
Thank you very much.

User avatar
HansV
Administrator
Posts: 78236
Joined: 16 Jan 2010, 00:14
Status: Microsoft MVP
Location: Wageningen, The Netherlands

Re: Get 1D Array using Evaluate

Post by HansV »

Great!
Best wishes,
Hans