remove carriage return
Hello,
I have a spreadsheet that has cells that are formatted with "wrap text" and the value is a short 2 to 5 word title. within the title it sometimes contains a chr(10) (carriage return).
I am using this line to remove the carriage return:
Sheets(1).Cells.Replace What:=Chr(10), Replacement:=""
The problem is that sometimes there is no space in between words, just the carriage return and it joins the 2 words without spaces. In other occasions it has a space before the carriage return and it works out fine for that case. How can i get it so that there will be only 1 space in between words in the cell without carriage returns?
thanks!
|