code_junkie

SQL Server to Excel 2007 - New Lines

Nov 12th, 2011
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.17 KB | None | 0 0
  1. Sub FixNewlines()
  2. For Each Cell In UsedRange
  3. Cell.FormulaR1C1 = Replace(Cell.FormulaR1C1, Chr(13), "")
  4. Next Cell
  5. End Sub
  6.  
  7. "a" & Chr(13) + Chr(10) & "b"
Add Comment
Please, Sign In to add comment