Code:
Dim oRange As Range
Dim iPage As Integer
Dim iEnd1 As Integer, iEnd2 As Integer
iPage = 2
With ActiveDocument
Selection.GoTo What:=wdGoToPage, Which:=wdGoToAbsolute, Count:=iPage
Set oRange = .Range(Start:=Selection.Range.Start, End:=.Bookmarks("\Page").Range.End)
oRange1.Delete
End With
Just wonder if there's a simpler way to delete a particular page in a Word document.
Thanks in advance.