replace cell text results in extra carriage return

macropod · #1 05-26-2022, 08:22 AM

That's because a cell's range includes the end-of-cell marker - which ordinarily looks like the '¤' symbol.

One approach would be to use:

Code:

Text = FullBoxes & " " & Split(ActiveDocument.Tables(1).Cell(1, 3).Range.Text, vbCr)(0) & " containing "

abonsey · #2 05-27-2022, 02:55 AM

Thanks. That worked Brilliantly

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How to split values from carriage-return from the cell	ganesang	Excel	3	12-02-2019 07:16 AM
Find / Replace hard Carriage Return with Line break.	GreenBoy	Word	2	03-11-2018 02:32 AM
carriage return on PPT	yangthomson	PowerPoint	0	04-21-2016 07:16 PM
Adding a carriage return at end of each line, and then a blank space, after text entry complete	CEMurphy4	Word VBA	1	12-02-2015 11:53 PM
Plain Text Content Control - Losing Styling on Carriage Return	kintap	Word	0	07-16-2014 12:43 PM