What is this line of code meant to do?
WS2.Cells(1, WS2.Columns.Count).End(xlToLeft).Column.Copy WS2.Cells(LastRow2 + 1, 1)
It appears to be copying the last column of data in WS2 to column 1 below existing data.
Could you attach a workbook with some sample data?
Perhaps that will help clarify things.
Bookmarks