how do i delete every other line (all line 2's) in a page?

Interesting question. (all line 2's). lines *in* a page?

If you have a page with lines *on* it then wouldn't there only be one
line 2?

Your follow up explanation wasn't much better. However, here is one
way. Run this macro:


Sub Test()
Selection.WholeStory
Selection.Collapse
Selection.MoveDown wdLine, 1
On Error GoTo Handler
Do
Selection.Bookmarks("\Line").Select
Selection.Delete
Selection.MoveDown wdLine, 1
Loop
Handler:
End Sub



own1y wrote:
the reason is it contains text

"Suzanne S. Barnhill" wrote:

If you will tell us why you want to do this, we may be able to come up with
a solution. Are the lines blank, or do they contain text? Do they end in
paragraph marks?

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
Word MVP FAQ site: http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

"own1y" wrote in message
...
how do i delete every other line (all line 2's) in a page?