Jak uložit aktuální nebo každou stránku jako samostatný dokument aplikace Word?
Pokud je ve vašem dokumentu Wordu více stránek, nyní stačí uložit pouze jednu aktuální stránku jako nový soubor Wordu. Normálně můžete zkopírovat a vložit aktuální data stránky do nového souboru Word a poté je uložit. Ale v tomto článku budu hovořit o tom, jak uložit aktuální nebo každou stránku jako samostatné dokumenty ze souboru Word.
Uložit aktuální stránku jako nový dokument Word s kódem VBA
Uložte každou stránku jako samostatné dokumenty Word pomocí Kutools pro Word
Uložit aktuální stránku jako nový dokument Word s kódem VBA
Následující kód VBA vám pomůže uložit aktuální obsah stránky do nového souboru Word, postupujte takto:
1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.
2, klikněte Vložit > Modula vložte následující kód do okna modulu.
Kód VBA: Uložit aktuální stránku jako nový 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 pak stiskněte F5 klíč ke spuštění tohoto kódu, ve vyskakovacím dialogovém okně zadejte název nového souboru, viz screenshot:
4. Potom klepněte na tlačítko OK Tlačítko a ve druhém vyskakovacím okně vyberte složku pro výstup nového souboru, viz screenshot:
5, klikněte OK Tlačítko, aktuální obsah stránky byl uložen jako nový soubor aplikace Word, můžete přejít do složky a zobrazit výsledek.
Uložte každou stránku jako samostatné dokumenty Word pomocí Kutools pro Word
Pokud chcete uložit každou stránku celého dokumentu jako samostatné soubory, Kutools pro WordJe Rozdělit funkce vám může udělat laskavost.
Kutools pro Word : s více než 100 užitečnými doplňky Wordu, můžete to vyzkoušet bez omezení za 60 dní. |
Po instalaci Kutools pro Word, proveďte prosím následující kroky:
1, klikněte Kutools Plus > Rozdělit, viz screenshot:
2. V Rozdělit dokument dialogové okno:
(1.) Vyberte Strana z Rozdělit rozbalovací seznam;
(1.) Klikněte tlačítko pro výběr složky pro výstup nových souborů;
(2.) A poté podle potřeby zadejte předponu pro nové uložené soubory.
3. Po dokončení nastavení klikněte na OK tlačítko pro zahájení rozdělení a poté byly všechny stránky v dokumentu Word uloženy jako samostatné soubory do konkrétní složky, jak ukazuje následující snímek obrazovky:
Klikněte a stáhněte si Kutools pro Word a bezplatnou zkušební verzi hned teď!
Nejlepší nástroje pro produktivitu v kanceláři
Kutools pro Word - Zvyšte své zkušenosti se slovem Over 100 Pozoruhodné vlastnosti!
🤖 Kutools AI asistent: Transformujte své psaní pomocí AI - Generovat obsah / Přepsat text / Shrnout dokumenty / Vyžádejte si informace na základě dokumentu, vše ve Wordu
📘 Mistrovství dokumentů: Rozdělit stránky / Sloučit dokumenty / Exportovat výběr v různých formátech (PDF/TXT/DOC/HTML...) / Dávkový převod do PDF / Exportujte stránky jako obrázky / Tisk více souborů najednou...
✏ Úprava obsahu: Dávkové hledání a nahrazení přes více souborů / Změnit velikost všech obrázků / Transponujte řádky a sloupce tabulky / Převést tabulku na text...
🧹 Čištění bez námahy: Smést pryč Extra prostory / Sekce přestávky / Všechny záhlaví / Textová pole / Odkazy / Další nástroje pro odstraňování naleznete u nás Odstranit skupinu...
➕ Kreativní vložky: Vložit Tisíc separátorů / Zaškrtávací políčka / Tlačítka rádia / QR kód / čárový kód / Tabulka diagonálních čar / Titulek rovnice / Titulek obrázku / Titulek tabulky / Více obrázků / Objevte více v Vložit skupinu...
???? Přesné výběry: Přesně konkrétní stránky / Tabulky / Tvary / nadpisové odstavce / Vylepšete navigaci pomocí vice Vyberte funkce...
⭐ Vylepšení hvězd: Navigujte rychle na libovolné místo / automatické vkládání opakujícího se textu / plynule přepínat mezi okny dokumentů / 11 Konverzní nástroje...