If you want to copy in to next empty row, remove this line

ms.Range("A2:X" & Rows.Count).ClearContents