You should only need to do this once... ie first formula, eg:
B1:
=IF(MOD(ROWS(A$1:A1)-ROW(A$1),16),"",A1&","&A2&","&A3&","&A4&","&A5&","&A6&","&A7&","&A8&","&A9&","&A10&","&A11&","&A12&","&A13&","&A14&","&A15&","&A16)
copied down to B6000
will only generate strings as and when required (eg string, 15 blanks, string, 15 blanks, string...) and each string will reference current row and subsequent 15.
You can use VBA of course - but the above is pretty simple I'm sure you'll agree.
If you want the listing in consecutive cells (eg B1 (A1:A16), B2 (A17:A32) etc let us know)
Bookmarks