DavidWaldo
02-14-2017, 10:08 AM
Imagine you have a column with data. And you want to spread data evenly among three workbooks. Is there a better way than cycle - copy each cell? Data doesnt need any sorting.
My idea was something like this...
For i = 1 to lastrow
If y = 4 then
Y = 1
End if
Copy cell i to workbook arrayOfNames(y)
Y = Y+1
Next i
This is just idea...i was hoping someone had more elegant solution. Sorry for typos, im writing this message on the phone. (On the bus home).
Thanks for any ideas.
My idea was something like this...
For i = 1 to lastrow
If y = 4 then
Y = 1
End if
Copy cell i to workbook arrayOfNames(y)
Y = Y+1
Next i
This is just idea...i was hoping someone had more elegant solution. Sorry for typos, im writing this message on the phone. (On the bus home).
Thanks for any ideas.