Saving part of word 2007 document

[Andyonline]

Hi, I have a word document that has over one hunderd pages and I want to save certain pages only once edited i.e. page 5, 6 10, 25 etc but I cannot figure out how to do this as each time I try the whole document is saved.

Any help would be appreciated.

Many Thanks

Andy

 

[Petey7]

Are you trying to make file with just those pages? Or did you make changes through out the document, and want to save only the changes to certain pages?

 

[Andyonline]

What i want to do is save each page I want to a new file. I know you could do this with older versions of Word and likewise print selected pages as well but I cannot figure ut how to save certain pages in the 2007 version

hope this helps

Andy

 

[strollin]

The simplest method I could think of is to open the original doc and do a "Save As..." to a different doc name. Then you can start deleting the pages you don't want. Periodically do a "Save" to keep from losing any edits you make.

 

[Andyonline]

Thanks Strollin, that the only thing I could think of too.

Andy

 

[Petey7]

It sounds like you want to make a file, with only certain pages. The simplest thing I can thing of, is to open a new document, and copy and paste the stuff you want from the original to the old, in the order you want them.

Strollin's advice should work equally well. To each his own.

 

[Andyonline]

Can you tell me how to delete a page please.

Thanks

Andy

 

[Petey7]

To delete a page, simply select everything on that page and press the delete button on your keyboard. The page is gone, but all pages after that one will be renumbered.

 

[strollin]

Here's a little macro I came up with that might help somewhat. It searches through a document and when it finds the text string *DELETE* it deletes that page. You could change the search text to whatever you wanted but you need to make sure it will be something that would NOT appear on any page you wanted to keep.

Basically, you would go through your doc and put the search text on any page you want deleted then run the macro. Afterwards you will need to save the doc so no pages will actually be deleted from the doc until you save it. I'd advise saving it under a different name until you're sure it worked correctly.

I haven't tested it extensively so make sure you have a backup of your doc before you run it.

Sub Del_marked_Pgs()

Dim strSearch As String
Dim rgeStart As Range

Set rgeStart = Selection.Range

strSearch = "*DELETE*"

With ActiveDocument.Range.Find
   .Text = strSearch
   Do While .Execute
      With .Parent
         .Select
         With Selection
            .Bookmarks("\Page").Range.Delete
         End With
      End With
   Loop
End With

rgeStart.Select

Application.Browser.Target = wdBrowsePage

End Sub

 

[Andyonline]

Thanks for that i will give it a go.