How can I save each page of a Word Documaent as it's own document?

A

Acleos

I created a document in Word 2003 that contains 100 or so pages. On each
page is a recipe. My question is, is there any way that I can save each page
as it’s own document other than selecting each page individually and then
saving it?

Thank you for any assistance.
 
T

Tony Jollans

To answer your question there is no way to do it without selecting each page
individually and then saving it, but you can automate the process with a
fairly simple macro ...

Num = 0
Do While ActiveDocument.Range.End > 1
Selection.HomeKey wdStory
Selection.Bookmarks("\Page").Range.Cut
With Documents.Add
.Range.Paste
Num = Num + 1
.SaveAs "Page" & Num
.Close
End With
Loop
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top