I want to delete page break using vba. This is what I am using:

Dim Rng As Range, iPage As Long
iPage = 2
With ActiveDocument
Set Rng = .GoTo(What:=wdGoToPage, Name:=iPage)


Set Rng = Rng.GoTo(What:=wdGoToBookmark, Name:="\page")
Rng.Delete
End With

When I step through the value passed to Rng is "..................

how can the above code be changed to accomplish my purpose? Also need to change footer after i delete page break.

I do not see this code as deleting a page break. This deletes a page of text more or less.

What, exactly, are you trying to do? Keep in mind that to Word, the concept of "page" is ambiguous, defined in relationship to the current printer driver.

Why do you need to change your footer? What is in it that needs to be different?

when the table that holds locations is lengthened so a new row can be added the next section goes to a new page with added whitespace because the page break that is auto entered goes with the section. If I manually delete that page break then the footer changes from 1 of 2 to 2 of 2 thus requireing a correction to the footer to put it back to 1 of 2. I am trying to create a macro so that when the user opens it they can use a key combo to delete the page break and correct the footer before she begins making edits to the document.

I thought I replied earlier but don't see it.

Tables and section breaks are very different from page breaks. Code does not address what you are trying to do.

You should not have to change the footer. Your page numbers should be set using Page fields, not typed directly into the footer.

Can you post a sample document (without proprietary info) that has the problem.

Sections / Headers and Footers in Microsoft Word 2007-2013