How can I delete lines between bookmarks

[Jeffrey Grantz]

Please help.

I have a document that contains a large table (8 pages long) and the
table has a number of bookmarks. All these bookmarks are at the start
of a row. Given 2 bookmarks, how can I delete all the rows in
between?

Thanks for any help.

 

[DaveLett]

Hi Jeffrey,
You can use something like the following:

Dim oRng As Range
Set oRng = ActiveDocument.Bookmarks("Test1").Range
With oRng
.MoveStart Unit:=wdRow, Count:=1
.End = ActiveDocument.Bookmarks("Test2").Range.Start
.Rows.delete
End With

HTH,
Dave