Sheets(Array).Copy Dynamically

Hi all,

i've hit a bit of a mental wall (been programming too many hours striaght) and cannot figure out how to do the following.

I have a sheet array sh_array(3)
of which all the slots may not contain data, but i want to turn it into the statement

Sheets(Array("sheet1", "sheet2", etc, etc).Copy

however as all the items in the sh_array may not be occupied i cannot simply do this

Sheets(sh_array(0), sh_array(1), sh_array(2), sh_array(3)).Copy

as it hits the subscription out of range if one of the items is a null.

so say only sh_array() slots 0 and 1 contain data

how do i dynamically turn it into the statement

Sheets(sh_array(0), sh_array(1)).Copy

as so forth if more/less elements of the sh_array are full.

I thought about a if statement testing the sh_array length but there must be a better way to do it.

Thanks

Jon

i could but as i want the sheets selected and copied together how would i produce the statement even if i knew the exact array size. this is the dynamic statement i'm after:

Sheets(New_Array(0), ..... , to New_Array(i)).Copy

without running a loop statement? (which would only copy the sheets individually anyway.

Please Login or Register  to view this content.

thanks for that

its a good idea, i'll have a play about with it

regards,

jon