Array of Values into Range in One Move

[Castle7]

I have a vector of values and a range that is the same size as the vector. I want to paste the values of this vector into the range in one shot WITHOUT using a for loop.

If v is the vector, r is the range, and i is the counter variable, I am trying to avoid this:

For i = 1 To UBound(v)
r(i).Value = v(i)
Next i

I'm looking for something like:
r.value = v
but of course this doesn't work

 

[Norie]

You need to tell us the range.

arr = Array("A", "B", "C", "D", "E")
' rows
Set rng = Range("A1:A5")
rng.Value = Application.Transpose(arr)
' columns
Set rng = Range("B1:F1")
rng.Value = arr

 

[Castle7]

Thanks Norie - Your reply solved my problem.

I was trying to do rows but did not transpose the vector.