Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Save DOC into multiple parts?
I have a word doc that is several pages. I would like to save each page as
a separate doc file. Is there a simple way to do this other than copy/paste? Thanks. |
#2
|
|||
|
|||
The following is a macro posted by Word MVP Doug Robbins in response to
a similar question: Sub splitter() ' ' splitter Macro ' Macro created 16-08-98 by Doug Robbins to save each page of a document ' as a separate file with the name Page#.DOC ' Selection.HomeKey Unit:=wdStory Pages = ActiveDocument.BuiltInDocumentProperties(wdPropert yPages) Counter = 0 While Counter Pages Counter = Counter + 1 DocName = "Page" & Format(Counter) ActiveDocument.Bookmarks("\Page").Range.Cut Documents.Add Selection.Paste ActiveDocument.SaveAs FileName:=DocName, FileFormat:= _ wdFormatDocument, LockComments:=False, Password:="", AddToRecentFiles:= _ True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:= _ False, SaveNativePictureFormat:=False, SaveFormsData:=False, _ SaveAsAOCELetter:=False ActiveWindow.Close Wend End Sub And if you don't know how to install a macro, see http://www.gmayor.com/installing_macro.htm . Chris wrote: I have a word doc that is several pages. I would like to save each page as a separate doc file. Is there a simple way to do this other than copy/paste? Thanks. |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Save a Word document to multiple folders? | Microsoft Word Help | |||
Save Parts of Large Mailmerge as Separate Files | Mailmerge | |||
Save Parts of Large Mailmerge as Separate Files | Microsoft Word Help | |||
How do you force a Save As in a Word based form? | Microsoft Word Help | |||
Save As...*.txt files | Microsoft Word Help |