The 'Rng.End = Rng.End - 1' is used because, when you select a cell range, you get the end-of-cell marker, which you don't want when you're going to paste the content somewhere else. What the code does instead, is to insert a temporary paragraph break before that, so as to keep the cell's paragraph formatting for whatever is the cell's last paragraph, then copy everything except the end-of-cell marker.
Regarding the string, are you wanting to keep the table, or just the string? Is it a particular string? How many cells are on the first row?
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
|