Originally Posted by SamT Edit WkSht.Cells(i, j) To WkSht.Cells(j, i) That really isn't going to satisfy the specified requirement: Originally Posted by JonJon I need the script to insert the data into a single designated column
WkSht.Cells(i, j)
WkSht.Cells(j, i)
Cheers Paul Edstein [Fmr MS MVP - Word]
Forum Rules