I always overlook the the opportunities to use Evaluate. Thanks Tom.

"Tom Ogilvy" wrote:

Sub AABB()
Range("A1:C3").Value = _
Evaluate("{1,2,3;4,5,6;7,8,9}")

End Sub

works for small amounts of data.

--
Regards,
Tom Ogilvy


"dodgo" wrote in message
oups.com...
I thought I'd done this in the past, but I can't remember if or how. I
want be able to assign an array of values to a range in 1 go, such as

1 2 3
4 5 6
7 8 9

to A1:C3

I'd thought I'd done something like Range("A1:C3") =
(1,2,3;4,5,6;7,8,9)
using ; as a delimiter between rows in the array, but that clearly
isn't working.

I'm quite familiar with the looping/iterator techniques available to
assign a variable array to a range. I was just hoping there was a way
to do this in one line of code.