End of cell command?

[Guest]

Is there a keyboard command to select from the cursor to the end of a table
cell?

I have an auto-generated report that contains a lot of text I need to
delete. The text is in table cells. It's something like this:

"Good text.
-------------
Text I need to delete, which might be multiple paragraphs or bulleted
lists or whatever. "

I'm trying to write a macro to do this work automatically. I can search on
the dashed line, but from there, I need to select to end of cell. End of
paragraph is often not enough, and I have to be careful not select the whole
cell, just to the end of the cell.

Any ideas? Thanks!

 

[Doug Robbins - Word MVP]

Assign a macro containing the following commands to the keyboard

Dim myrange As Range
Set myrange = Selection.Cells(1).Range
myrange.Start = Selection.Range.Start
myrange.End = myrange.End - 1
myrange.Select


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP