Code Modification

I have attached an Excel file. As it is now with the value 8 in range "E4", it produces the numbers in? range("A9:J2010") and place them in range("O9:X2010") The objective is that if I change the value in range("E4") to 6 then the result should start off like this: 1,2,3,4,5,6,7,8,9,10 1,2,3,4,5,6,11,12,13,14 1,2,3,4,5,6,15,16,17,18 if I change the value in range(E4") to 4 then the result should start off like this: 1,2,3,4,5,6,7,8,9,10 1,2,3,4,11,12,13,14,15,16 1,2,3,4,17,18,19,20,21,22 The code should be flexible to work with 8, 10, or 12 columns And row right to the end of the work sheet. Derick