![]() |
|
#1
|
|||
|
|||
|
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
Thanks in advance. |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
Delete a page after Section Break Next Page
|
Aston | Word | 9 | 04-27-2022 07:38 AM |
| Can't delete word document | Sparky | Word | 1 | 04-18-2012 12:20 AM |
600 page document in word 2007
|
ggun123 | Word | 3 | 08-23-2011 06:54 AM |
How to delete one PAGE in word 2002?
|
Sleeper | Word | 2 | 06-28-2011 04:58 PM |
| delete subtitle on a word document damn thing will not go | waynegr | Word | 0 | 07-09-2006 06:15 AM |