Deleting Specific pages from Word Document using Macro
' ' TEST Macro ' Macro created 2/16/2012 by PCTR010312DM 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