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:
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:
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å 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:
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...