Save Pages of a Document as Separate Documents

Twoim najlepszym zakładem jest użycie subdokumentów. Zobacz stronę pomocy firmy Microsoft tutaj: http://office.microsoft.com/en-us/word-help/combine-or-split-subdocuments-HP005186930.aspx

Mówi ona o tworzeniu poddokumentów pod nagłówkiem Podziel poddokument na dwa poddokumenty.

Tutaj znajduje się użyteczna odpowiedź Yahoo: http://answers.yahoo.com/question/index?qid=20070921100104AAU8Ebh

Jeśli nie musisz go edytować, możesz wyeksportować do PDF (nie używaj drukarki PDF, użyj opcjonalnej wtyczki programu Word) i explode PDF, używając narzędzia takiego jak pdftk .

Kliknij ‘Zapisz jako’ Wybierz PDF, a następnie kliknij ‘opcje’ na tym samym ekranie. Pod opcjami możesz wybrać, które strony chcesz zapisać!

Mam dokument Word, który musiałem zapisać każdą stronę jako osobny dokument w formacie Rich Text. Możesz zmieniać zmienne dla pliku .txt, docx itp., w zależności od potrzeb, ale pamiętaj o zmianie FileFormat=. Zauważ, że zaczyna się ona od bieżącej strony, na której jesteś w Application.Browser.Target = wdBrowsePage i trwa przez pętlę przez następne 99 stron (w sumie 100).

Zmienna i reprezentuje numer pliku (DCX_1.Rtf) (DCX_2.Rtf) itd.

For i = 1 To 100
    Application.Browser.Target = wdBrowsePage
    ActiveDocument.Bookmarks("\page").Range.Copy
    Documents.Add
    Selection.Paste
    ChangeFileOpenDirectory "C:\__BOOK\JUNK\"
    ActiveDocument.SaveAs FileName:="DCX_" & i & ".rtf", FileFormat:=wdFormatRTF
    ActiveDocument.Close
    Application.Browser.Next
Next i

To, co możesz zrobić, to najpierw skopiować i wkleić dokument, aby mieć dwie kopie. Na jednej z nich otwórz go i przejdź do zapisu - jako wpisz szczegóły zdarzenia następnie na głównym dokumencie przejdź do ostatniej strony, do ostatniej linijki, ostatnie słowo zdania wymaż wszystkie teksty na wszystkich stronach, których nie potrzebujesz używając Backspace… nawet jeśli potrwa to dłużej to i tak zachowa Twoje formatowanie.

powtórz powyższe z resztą opisu zdarzenia, regulaminu i budżetu zdarzenia.

Word 10 pozwala na kopiowanie i wklejanie dowolnych elementów z dokumentu Word przy zachowaniu tego samego formatu, co oryginalny dokument. Po skopiowaniu relewantnego tekstu z dokumentu źródłowego, otwórz nowy dokument Word Doc, kliknij prawym przyciskiem myszy, a z poprzednich opcji kliknij “Zachowaj formatowanie źródłowe”.