delete last row and return to the last row in the table

[De Vo]

hi

more experience needed...

if there a quick swift way to delete rows out the table and if it then
jumps out of the table due to being the last row, move the insertion
point to the previous row.

i have just thought i can run my row scanner routine backwards but i
would like to jump to the last row in the table

is there an easy way of doing that...

answer on a newsgroup

many thanks

devo

 

[Doug Robbins - Word MVP - DELETE UPPERCASE CHARACT]

ActiveDocument.Tables(1).Rows(ActiveDocument.Tables(1).Rows.Count).Delete
ActiveDocument.Tables(1).Rows(ActiveDocument.Tables(1).Rows.Count).Cells(1).Range.Select
Selection.Collapse wdCollapseStart


--
Please post any further questions or followup to the newsgroups for the
benefit of others who may be interested. Unsolicited questions forwarded
directly to me will only be answered on a paid consulting basis.

Hope this helps
Doug Robbins - Word MVP

 

[De Vo]

Thanks !!!


Doug Robbins - Word MVP - DELETE UPPERCASE CHARACTERS FROM EMAIL