Through a little testing I have found that the following statement
won't work if intRow is greater than 255

ActiveCell.Copy Cells(1, intRow)

This is true if Cells(1,256) is used.

How do I get past this limitation?

Thanks

-tom