I found ,
Replace the below line
withF_Rng.Offset(, 1).Resize(, 20).Copy Parts.Cells(i, 2)
And FIXED .F_Rng.Cells.Offset(, 1).EntireRow.Resize(, 20).Copy Parts.Cells(i, 2)
I found ,
Replace the below line
withF_Rng.Offset(, 1).Resize(, 20).Copy Parts.Cells(i, 2)
And FIXED .F_Rng.Cells.Offset(, 1).EntireRow.Resize(, 20).Copy Parts.Cells(i, 2)
Last edited by parscon; 01-09-2014 at 08:37 AM.