Hvordan gemmes den aktuelle eller hver side som et separat Word-dokument?
Hvis der er flere sider i dit Word-dokument, skal du nu kun gemme en aktuel side som en ny Word-fil. Normalt kan du kopiere og indsætte de aktuelle sidedata i en ny Word-fil og derefter gemme dem. Men i denne artikel vil jeg tale om, hvordan man gemmer nuværende eller hver side som separate dokumenter fra en Word-fil.
Gem den aktuelle side som nyt Word-dokument med VBA-kode
Gem hver side som separate Word-dokumenter med Kutools til Word
Gem den aktuelle side som nyt Word-dokument med VBA-kode
Følgende VBA-kode kan hjælpe dig med at gemme et aktuelt sideindhold i en ny Word-fil, gør som dette:
1. Hold nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.
2. Klik indsatte > Moduler, og indsæt følgende kode i modulvinduet.
VBA-kode: Gem den aktuelle side som nyt 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. Og tryk derefter på F5 nøgle til at køre denne kode, i den poppede dialogboks skal du indtaste et navn til den nye fil, se skærmbillede:
4. Klik derefter på OK knap, og i det andet poppede vindue skal du vælge en mappe for at output den nye fil, se skærmbillede:
5. Klik OK knappen, er det aktuelle sideindhold gemt som en ny Word-fil, kan du gå til mappen for at se resultatet.
Gem hver side som separate Word-dokumenter med Kutools til Word
Hvis du vil gemme hver side af hele dokumentet som separate filer, skal Kutools for Word's Dele funktion kan gøre dig en tjeneste.
Kutools for Word : med mere end 100 praktiske Word-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 60 dage. |
Efter installation Kutools for Wordskal du gøre med følgende trin:
1. Klik Kutools Plus > Dele, se skærmbillede:
2. I Opdel dokument dialog boks:
(1.) Vælg Side fra Opdel ved rulleliste
(1.) Klik på knap for at vælge en mappe til output af de nye filer;
(2.) Og angiv derefter præfikset for de nye gemte filer efter behov.
3. Når du er færdig med indstillingerne, skal du klikke på OK knap for at starte opdeling, og derefter er alle siderne i Word-dokumentet gemt som separate filer i den specifikke mappe som vist på følgende skærmbillede:
Klik for at downloade Kutools til Word og gratis prøveversion nu!
Bedste kontorproduktivitetsværktøjer
Kutools for Word - Forøg din Word-oplevelse med Over 100 Bemærkelsesværdige funktioner!
🤖 Kutools AI-assistent: Transformer din skrivning med AI - Generer indhold / Omskriv tekst / Opsummer dokumenter / Spørg for information baseret på Dokument, alt sammen i Word
📘 Dokumentbeherskelse: Opdelt sider / Flet dokumenter / Eksporter udvalg i forskellige formater (PDF/TXT/DOC/HTML...) / Batch Konverter til PDF / Eksporter sider som billeder / Udskriv flere filer på én gang...
✏ Indholdsredigering: Batch Find og erstat på tværs af flere filer / Ændr størrelse på alle billeder / Transponer tabelrækker og kolonner / Konverter tabel til tekst...
🧹 Ubesværet rengøring: Fej væk Ekstra pladser / Afsnit bryder / Alle overskrifter / Tekstbokse / Hyperlinks / For mere fjernelse af værktøjer, gå til vores Fjern gruppe...
➕ Kreative indlæg: Indsæt Tusind adskillere / Afkrydsningsfelter / Radio knapper / QR kode / Stregkode / Diagonal linjebord / Ligningstekst / Billede Caption / Tabeltekst / Flere billeder / Oplev mere i Indsæt gruppe...
???? Præcisionsvalg: Find ud af specifikke sider / tabeller / former / overskrifter / Forbedre navigation med mere Vælg funktioner...
⭐ Stjerneforbedringer: Naviger hurtigt til ethvert sted / automatisk indsæt gentagende tekst / skifte problemfrit mellem dokumentvinduer / 11 Konverteringsværktøjer...