I believe that in 2003 Harlan Grove posted a general resizing procedure,
aresize, that might be of interest. Once you find the function, I
believe that

aresize Array1, , ,0, 0, 0
Range("PasteCell1").Value = Array1

should give you your desired result.

Alan Beban

ExcelMonkey < wrote:
I had a 2D VBA Array "Array1" that had the same dimensions as a named
excel range "PasteCell1". When I wanted to dump the data from VBA to
Excel I did the following:

Range("PasteCell1") = Array1

This worked becuase both were two dimensions and dimensioned 13X9.

However the VBA array has been expanded to 5 dimensions.

Array1(1 to 13, 1 to 9, 1 to 8760, 1 to 10, 1 to 3)

The first and second dimesions are still the same as my named range
(i.e. 13X9). Now that I have the extra dimensions I am assuming that I
either have to use a loop t fill the excel range or is there a way to
make the excel range equal to the VBA array by qualifying that I want
the first element of dimesions 3, 4 and 5. Can this be done?


---
Message posted from http://www.ExcelForum.com/