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

[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.

 

[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