Put 1D array into column

[Charlie]

I can move a 2D array into a range, no problem. I can move a 1D array into
cells across a row, no problem. But is there a syntax that will allow me to
move a 1D array into cells down a row?

[Charlie]

I mean "down a column?"

"Charlie" wrote:

> I can move a 2D array into a range, no problem. I can move a 1D array into
> cells across a row, no problem. But is there a syntax that will allow me to
> move a 1D array into cells down a row?

[Paul Mathews]

Range(BlahdyBlah).Value = Application.Worksheetfunction.Transpose(ArrayName)

"Charlie" wrote:

> I can move a 2D array into a range, no problem. I can move a 1D array into
> cells across a row, no problem. But is there a syntax that will allow me to
> move a 1D array into cells down a row?

[Charlie]

That's the ticket! It converts the 1D array to 2D in the column direction,
e.g.

Dim a(3) '(Base 1)
a = Application.WorksheetFunction.Transpose(a)

"a" becomes a(1,1), a(2,1), a(3,1)

very useful! Thanks.

"Paul Mathews" wrote:

> Range(BlahdyBlah).Value = Application.Worksheetfunction.Transpose(ArrayName)
>
> "Charlie" wrote:
>
> > I can move a 2D array into a range, no problem. I can move a 1D array into
> > cells across a row, no problem. But is there a syntax that will allow me to
> > move a 1D array into cells down a row?

[Alan Beban]

Charlie wrote:
> That's the ticket! It converts the 1D array to 2D in the column direction,
> e.g.
>
> Dim a(3) '(Base 1)
> a = Application.WorksheetFunction.Transpose(a)
>
> "a" becomes a(1,1), a(2,1), a(3,1)
>
> very useful! Thanks.

Same result for Dim a(2) '(Base 0)

Alan Beban