Hoppa till huvudinnehåll

Hur sparar jag aktuell eller varje sida som ett separat Word-dokument?

Om det finns flera sidor i ditt Word-dokument behöver du bara spara endast en aktuell sida som en ny Word-fil. Normalt kan du kopiera och klistra in aktuell siddata i en ny Word-fil och sedan spara den. Men i den här artikeln kommer jag att prata om hur man sparar aktuell eller varje sida som separata dokument från en Word-fil.

Spara aktuell sida som nytt Word-dokument med VBA-kod

Spara varje sida som separata Word-dokument med Kutools for Word


Spara aktuell sida som nytt Word-dokument med VBA-kod

Följande VBA-kod kan hjälpa dig att spara ett aktuellt sidinnehåll i en ny Word-fil, gör så här:

1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. Klicka Insert > Modulernaoch klistra in följande kod i modulfönstret.

VBA-kod: Spara aktuell sida som nytt Word-dokument:

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. Och tryck sedan på F5 nyckel för att köra den här koden, i den poppade dialogrutan, ange ett namn för den nya filen, se skärmdump:

doc spara nuvarande sida 1

4. Klicka sedan OK -knappen, och i det andra poppade fönstret, välj en mapp för att mata ut den nya filen, se skärmdump:

doc spara nuvarande sida 2

5. Klicka OK knappen, har det aktuella sidinnehållet sparats som en ny Word-fil, kan du gå till mappen för att se resultatet.


Spara varje sida som separata Word-dokument med Kutools for Word

Om du vill spara varje sida i hela dokumentet som separata filer, kommer Kutools för WordÄr Split funktionen kan göra dig en tjänst.

Kutools för Word : med mer än 100 praktiska Word-tillägg, gratis att prova utan begränsning på 60 dagar. 

När du har installerat Kutools för Word, gör med följande steg:

1. Klicka Kutools Plus > Split, se skärmdump:

2. I Dela dokument dialog ruta:

(1.) Välj Sida från Dela med rullgardinsmeny;

(1.) Klicka på doc spara nuvarande sida 5 knappen för att välja en mapp för att mata ut de nya filerna;

(2.) Ange sedan prefixet för de nya sparade filerna efter behov.

3. När du har gjort inställningarna klickar du på OK för att börja dela, och sedan har alla sidor i Word-dokumentet sparats som separata filer i den specifika mappen som följande skärmdump visas:

doc spara nuvarande sida 6

Klicka för att ladda ner Kutools for Word och gratis testversion nu!

Bästa kontorsproduktivitetsverktyg

Kutools för Word - Höj din ordupplevelse med Over 100 Anmärkningsvärda funktioner!

🤖 Kutools AI Assistant: Förvandla ditt skrivande med AI - Generera innehåll  /  Skriv om text  /  Sammanfatta dokument  /  Fråga för information baserat på dokument, allt i Word

📘 Dokumentbehärskning: Dela sidor  /  Sammanfoga dokument  /  Exportera urval i olika format (PDF/TXT/DOC/HTML...)  /  Batchkonvertera till PDF  /  Exportera sidor som bilder  /  Skriv ut flera filer samtidigt...

Innehållsredigering: Batch Hitta och ersätt över flera filer  /  Ändra storlek på alla bilder  /  Transponera tabellrader och kolumner  /  Konvertera tabell till text...

🧹 Enkel rengöring: Svep bort Extra utrymmen  /  Avsnitt bryter  /  Alla rubriker  /  Textrutor  /  Hyperlänkar  / För fler borttagningsverktyg, gå till vår Ta bort gruppen...

Kreativa inlägg: Föra in Tusen avskiljare  /  Kryssrutor  /  radio Knappar  /  QR-kod  /  Streckkod  /  Diagonal linjebord  /  Bildtext för ekvation  /  Bild Bildtext  /  Tabelltextning  /  Flera bilder  / Upptäck mer i Infoga grupp...

🔍 Precisionsval: Precisera specifika sidor  /  Tabellerna  /  former  /  rubrikerna  / Förbättra navigering med mer Välj funktioner...

Stjärnförbättringar: Navigera snabbt till vilken plats som helst  /  infoga repetitiv text automatiskt  /  växla sömlöst mellan dokumentfönster  /  11 Konverteringsverktyg...

👉 Vill du prova dessa funktioner? Kutools för Word erbjuder en 60-dagars gratis försök, utan begränsningar! 🚀
 
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