A page is an entirely transient thing in Word that depends on a number of
factors concerned with the page layout and content. You can use a macro to
delete the content of the current page, but this will cause the text to
reflow and the results are unpredictable because they take no account of the
rest of the document - however, you can try the code to see if it does what
you require:
SubPageDelete()
ActiveDocument.Bookmarks("\page").Range.Delete
End Sub
or
Sub PageDelete()
sNumber = InputBox("Delete from which page", "Delete Pages", 1)
sRange = InputBox("Delete how many pages", "Delete Pages", 1)
Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Name:=sNumber
For a = 1 To sRange
ActiveDocument.Bookmarks("\page").Range.Delete
Next a
End Sub
See
http://www.gmayor.dsl.pipex.com/installing_macro.htm
--
<>>< ><<> ><<> <>>< ><<> <>>< <>>< ><<>
Graham Mayor - Word MVP
E-mail (e-mail address removed)
Web site
www.gmayor.dsl.pipex.com
Word MVP web site
www.mvps.org/word
<>>< ><<> ><<> <>>< ><<> <>>< <>>< ><<>