Hoe sla ik de huidige bijlage op, of elke pagina als een afzonderlijk Word-document?

AuteurXiaoyang Wijzigingsdatum2024-09-18

Als uw Word-document meerdere pagina’s bevat, wilt u misschien alleen de huidige pagina opslaan als nieuw Word-bestand. De gebruikelijke aanpak is om de inhoud van die pagina te kopiëren en in een nieuw document te plakken, dat u daarna opslaat. In dit artikel ontdekt u echter efficiëntere manieren om de huidige of elke afzonderlijke pagina direct op te slaan als apart Word-document — allemaal vanuit één bestand.

De huidige bijlage opslaan pagina als nieuw Word-document met VBA-code

Elke pagina opslaan als afzonderlijke Word-documenten met Kutools voor Word

De huidige bijlage opslaan pagina als nieuw Word-document met VBA-code

De volgende VBA-code helpt u de inhoud van de huidige pagina op te slaan in een nieuw Word-bestand. Volg deze stappen:

Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.

Klik op Invoegen>Module, en plak de volgende code in het venster Module:

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

Druk op F5 om deze code uit te voeren. Voer in het pop-upvenster een naam in voor het gegenereerde bestand. Zie schermafbeelding:
Klik op OK, en selecteer in het tweede pop-upvenster Bladerende locatie waar de Gegenereerd bestand wordt opgeslagen.
Klik op OK en de inhoud van de huidige pagina wordt opgeslagen als een nieuw Word-bestand. U kunt het resultaat direct bekijken in de geselecteerde map.

Elke pagina opslaan als afzonderlijke Word-documenten met Kutools voor Word

Als u elke pagina van het hele document als afzonderlijk bestand wilt opslaan, helpt de Kutools voor Word-functie Splitsen u daarbij.

Na installatie van Kutools voor Word, volgt u deze stappen:

Klik op KUTOOLS PLUS > Splitsen. Zie de schermafbeelding:
In het dialoogvenster Document Splitsen:
1. Selecteer Pagina in het veld Splitsen op keuzelijst.
2. Klik op de knop om een map te kiezen waarin u het gegenereerde bestand wilt opslaan.
3. Geef indien nodig het voorvoegsel op dat u wilt gebruiken voor de nieuw opgeslagen bestanden.
Nadat u de instellingen hebt voltooid, klikt u op OK om het splitsen te starten. Alle pagina’s in het Word-document worden opgeslagen als afzonderlijke bestanden in de opgegeven map. Zie schermafbeelding:

Beste kantoorproductiviteitstools

Kutools voor Word – Verrijk uw Word-ervaring met meer dan 100 opmerkelijke functies!

🤖KUTOOLS AI-functies: AI-assistent / Realtime-assistent / Super Polish (opmaak behouden) / Super Vertalen (opmaak behouden) / AI-redactie / AI-proeflezen...

📘Documentbeheer: Pagina's splitsen, documenten samenvoegen, selectie exporteren in diverse formaten (PDF/TXT/DOC/HTML…), batchconversie naar PDF…

✏Inhoudsbewerking: Batch Zoeken en Vervangen in meerdere bestanden / Alle afbeeldingen herschalen / Tabel transponeren: rijen en kolommen omwisselen / Tabel naar tekst converteren...

🧹Moeiteloos opschonen: Veeg overbodige spaties, sectie-einden, tekstvakken en hyperlinks weg. Ga voor nog meer verwijderopties naar de Verwijderen-groep...

➕Creatieve invoegingen: Voeg duizendtalscheidingstekens, selectievakjes, keuzerondjes, QR-codes, streepjescodes en meerdere afbeeldingen in. Ontdek meer in de Invoegen-groep...

🔍Precieze selecties: Selecteer nauwkeurig specifieke pagina's, tabellen, vormen en kopteksten. Verbeter je navigatie met de meer-functies Selecteren…

⭐Sterverhogingen: Navigeer naar elke locatie / Automatisch herhalende tekst invoegen / Schakelen tussen documentvensters / 11 conversietools Conversie...

🌍Ondersteunt 40+ talen: Gebruik Kutools in uw voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en meer dan 40 andere talen!

Gratis downloaden Nu kopen Meer informatie

Office Tab– Brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger

Schakel tabbladbewerking en -lezen in in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
Open en maak meerdere documenten aan in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
Verhoog uw productiviteit met 50 % en bespaar dagelijks honderden muisklikken!

Gratis downloaden Nu kopen Meer informatie

✨ Kutools for Office – Één installatie, vijf krachtige tools!

Bevat Office Tab Pro·Kutools voor Excel·Kutools voor Outlook·Kutools voor Word·Kutools for PowerPoint

📦 Ontvang alle 5 tools in één pakket | 🔗 Naadloze integratie met Microsoft Office | ⚡ Tijd besparen en verhoog direct uw productiviteit

⬇️ Nu downloaden 🎁 Het volledige pakket kopen 📖 Meer informatie

Beste kantoorproductiviteitstools

Kutools voor Word– 100+ Tools voor Word

🤖KUTOOLS AI-functies:AI Assistent/Realtime Assistent/Super Polish/Super Vertalen/AI Redactie/AI Proeflezen
📘Documentbeheersing:Pagina's splitsen/Documenten samenvoegen/Batchconversie naar PDF
✏Inhoudsbewerking:Batch Zoeken en Vervangen/Alle afbeeldingen herschalen
🧹Moeiteloos opschonen:Overbodige spaties verwijderen/Sectie-einde verwijderen
➕Creatieve invoegingen:Duizendtalscheidingstekens invoegen/Selectievakje invoegen/QR-code maken
🌍Ondersteunt 40+ talen: Kutools spreekt uw taal – met ondersteuning voor meer dan 40 talen!

Gratis downloaden Nu kopen Meer informatie over Kutools