use this code to fix sample sheet
vb Code:
  1. For i = 1 To 105
  2. Cells(i, 1) = Replace(Cells(i, 1), vbLf, vbTab)
  3. Next
  4. Range("A1:A105").WrapText = False
  5. Range("A1:A105").EntireColumn.AutoFit
  6. Range("A1:A105").EntireRow.AutoFit