Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
The problem is that this command is copying onto the top portion of the second page not including the second page.
Dim r As Range
Set r = ActiveDocument.Range(Start:=ActiveDocument _
.Bookmarks("\page").Start, _
End:=(ActiveDocument.Bookmarks("\page").End - 1))
r.Select
r.Copy