Przejdź do głównej zawartości

Jak zapisać bieżącą lub każdą stronę jako oddzielny dokument Word?

Jeśli w dokumencie programu Word jest wiele stron, wystarczy zapisać tylko jedną bieżącą stronę jako nowy plik programu Word. Zwykle można skopiować i wkleić dane bieżącej strony do nowego pliku programu Word, a następnie zapisać. Ale w tym artykule omówię, jak zapisać bieżącą lub każdą stronę jako oddzielne dokumenty z pliku Word.

Zapisz bieżącą stronę jako nowy dokument Word z kodem VBA

Zapisz każdą stronę jako oddzielne dokumenty Word za pomocą Kutools for Word


Zapisz bieżącą stronę jako nowy dokument Word z kodem VBA

Poniższy kod VBA może pomóc w zapisaniu bieżącej zawartości strony w nowym pliku Word, wykonaj następujące czynności:

1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod w oknie modułu.

Kod VBA: Zapisz bieżącą stronę jako nowy dokument Word:

Sub SaveCurrentPageAsANewDoc()
    Dim xDoc As Document
    Dim xNewDoc As Document
    Dim xFileName As String
    Dim xFolderPath As Variant
    Dim xDlg As FileDialog
    Set xDoc = ActiveDocument
    xFileName = InputBox("Enter file name here: ", "KuTools for Word")
    If xFileName = "" Then Exit Sub
    Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
    If xDlg.Show = -1 Then
        xFolderPath = xDlg.SelectedItems(1)
        xDoc.Bookmarks("\Page").Range.Select
        Selection.Copy
        Set xNewDoc = Documents.Add
        Selection.Paste
        xNewDoc.SaveAs xFolderPath & "\" & xFileName & ".docx"
        xNewDoc.Close
    End If
End Sub

3. A następnie naciśnij F5 klucz do uruchomienia tego kodu, w wyskakującym oknie dialogowym wprowadź nazwę nowego pliku, patrz zrzut ekranu:

doc zapisz bieżącą stronę 1

4. Następnie kliknij OK przycisk, aw drugim wyskakującym oknie wybierz folder, aby wyprowadzić nowy plik, patrz zrzut ekranu:

doc zapisz bieżącą stronę 2

5. Kliknij OK przycisk, aktualna zawartość strony została zapisana jako nowy plik Word, możesz przejść do folderu, aby zobaczyć wynik.


Zapisz każdą stronę jako oddzielne dokumenty Word za pomocą Kutools for Word

Jeśli chcesz zapisać każdą stronę całego dokumentu jako oddzielne pliki, rozszerzenie Kutools dla Worda'S Split funkcja może wyświadczyć ci przysługę.

Kutools dla Worda : z ponad 100 przydatnymi dodatkami do Worda, które można wypróbować bezpłatnie bez ograniczeń przez 60 dni. 

Po zainstalowaniu Kutools dla Worda, wykonaj następujące czynności:

1. Kliknij Kutools Plus > Splitzobacz zrzut ekranu:

2, w Podziel dokument Okno dialogowe:

(1.) Wybierz Strona z Podziel według Lista rozwijana;

(1.) Kliknij doc zapisz bieżącą stronę 5 przycisk, aby wybrać folder do wyprowadzenia nowych plików;

(2.) Następnie określ przedrostek dla nowych zapisanych plików, zgodnie z potrzebami.

3. Po zakończeniu ustawień kliknij OK przycisk, aby rozpocząć dzielenie, a następnie wszystkie strony w dokumencie programu Word zostały zapisane jako oddzielne pliki w określonym folderze, jak pokazano na poniższym zrzucie ekranu:

doc zapisz bieżącą stronę 6

Kliknij, aby pobrać Kutools for Word i bezpłatną wersję próbną już teraz!

Najlepsze narzędzia biurowe

Kutools dla Worda - Podnieś swoje doświadczenie ze słowami dzięki Over 100 Niezwykłe funkcje!

🤖 Kutools Asystent AI: Zmień swoje pisanie dzięki AI - Generuj zawartość  /  Przepisz tekst  /  Podsumowanie dokumentów  /  Zapytaj o informacje na podstawie Dokumentu, wszystko w programie Word

📘 Znajomość dokumentów: Podziel strony  /  Scal dokumenty  /  Eksportuj zaznaczenie w różnych formatach (PDF/TXT/DOC/HTML...)  /  Wsadowa konwersja do formatu PDF  /  Eksportuj strony jako obrazy  /  Drukuj wiele plików jednocześnie...

Edycja treści: Znajdź i zamień partii w wielu plikach  /  Zmień rozmiar wszystkich zdjęć  /  Transponuj wiersze i kolumny tabeli  /  Konwertuj tabelę na tekst...

🧹 Łatwe czyszczenie: Wymień Dodatkowe przestrzenie  /  Podziały sekcji  /  Wszystkie nagłówki  /  Pola tekstowe  /  Hiperłącza  / Więcej narzędzi do usuwania znajdziesz na naszej stronie Usuń grupę...

Kreatywne wstawki: Wstawić Tysiące separatorów  /  Pola wyboru  /  Przyciski Radio  /  Kod QR  /  kod kreskowy  /  Tabela linii ukośnych  /  Podpis równania  /  Tytuł Zdjęcia  /  Podpis tabeli  /  Wiele zdjęć  / Odkryj więcej w Wstaw grupę...

🔍 Precyzyjne wybory: Punktowy konkretne strony  /  stoły  /  kształty  /  nagłówki akapitów  / Ulepsz nawigację za pomocą jeszcze Wybierz funkcje...

Ulepszenia gwiazd: Nawiguj szybko do dowolnej lokalizacji  /  automatyczne wstawianie powtarzającego się tekstu  /  płynnie przełączaj się pomiędzy oknami dokumentów  /  11 Narzędzia konwersji...

???? Chcesz wypróbować te funkcje? Kutools dla Word oferuje Bezpłatna wersja próbna 60-day, bez ograniczeń! 🚀
 
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I am using Office 365. I think I did everything right to split doc in pages, tried several times, mas the splited page docs are not saved on destination foler.
This comment was minimized by the moderator on the site
Have downloaded Kutools , however do not have ENTERPRISE as an option. Only KUTOOLS and KUTOOLS PLUS, please advise how to activate Enterprise
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations