Replace this line

Sheets("Masterlist").Cells(j, 2).Selection.Paste


With

Sheets("Masterlist").Cells(j, 2).PasteSpecial xlPasteAll