On Wednesday, January 22, 2014 12:19:46 AM UTC-8, Claus Busch wrote:
Hi Howard,



Am Tue, 21 Jan 2014 19:32:52 -0800 (PST) schrieb L. Howard:



wks1.Range("A" & i & ":nCols" & i + nnCols).Copy wks2.Cells(1, j)



change the line above to:

wks1.Range("A" & i & ":" & nCols & i + nnCols).Copy wks2.Cells(1, j)





Regards

Claus B.


Right on!! I was thinking the problem was with the InputBox not the syntax of the code line.

Works great!

Thanks Claus.

Regards,
Howard