Thread: [Solved] Page to Page Information
View Single Post
 
Old 09-15-2011, 05:12 AM
OTPM OTPM is offline Windows 7 32bit Office 2010 32bit
Expert
 
Join Date: Apr 2011
Location: West Midlands
Posts: 981
OTPM is on a distinguished road
Default

Hi
A very basic a simple solution, assuming your documents are 1 page long is to use the following vba code. Cut and paste this code into a Module sheet in MS Word.

Sub Macro2()
'
' Macro2 Macro
'
'
Selection.WholeStory
Selection.Copy
Selection.EndKey Unit:=wdStory
Selection.InsertBreak Type:=wdPageBreak
Selection.PasteAndFormat (wdFormatOriginalFormatting)
Selection.InsertBreak Type:=wdPageBreak
Selection.PasteAndFormat (wdFormatOriginalFormatting)
Selection.HomeKey Unit:=wdStory
End Sub

When you have completed typing your first page, run this macro and it will duplicate the first page to pages 2 and 3.

If you need anything more complex then provide more detail about the style of the document etc and we will see what we can do for you.
Good luck.
Tony(OTPM)
Reply With Quote