Wenk: Ander tale is Google-vertaal. U kan die English weergawe van hierdie skakel.
Teken aan
x
or
x
x
registreer
x

or

Hoe om dokumente in verskeie dokumente in woord te verdeel?

As jy 'n massiewe woorddokument het wat jy in verskeie dokumente moet verdeel, neem 'n paar minute om hierdie handleiding te lees. Hierdie handleiding wys jou twee metodes om 'n dokument in verskeie dokumente te verdeel.

Verdeel Word-dokument deur gespesifiseerde afbakening met VBA

Verdeel Word dokument per bladsy met VBA

Verdeel Word dokument deur opskrif / bladsy / afdeling breek / bladsy breek met die gebruik van Kutools vir Word

Maklik verdeel 'n Word-dokument na veelvuldige per bladsy, afdeling / bladsy breek, of op een slag!

In vergelyking met die splitsing van 'n Word-dokument deur kopiëring en plak, sal Kutools for Word u werk vergemaklik en u werkdoeltreffendheid dramaties verbeter deur die Split-funksie wat vinnig die huidige opening van Word-dokument kan verdeel na veelvuldige per bladsy, per afdeling breek, per bladsy breek, of deur opskrif 1 soos jy nodig het. Kliek vir 60-dag gratis proeflopie!
advertensie verdeel dokumente per bladsy

Kutools for Word: Voeg 100 nuwe gevorderde funksies by na Word 2003 / 2007 / 2010 / 2013 / 2016 / 2019.
Office Tab: Aktiveer Tabbed redigering en blaai in Office, Net soos Chrome, Firefox, IE 8 / 9 / 10.
Classic Menu for Office: Bring ou blik van kantoor 2003 terug na Office 2007, 2010, 2013, 2016 en 2019.

pyl blou regte borrel Verdeel Word-dokument deur gespesifiseerde afbakening met VBA

In plaas daarvan om handmatig met dokumente in verskeie dokumente te verdeel, sal hierdie metode 'n VBA bekendstel om 'n Word-dokument deur die gespesifiseerde delimiter in Word te verdeel. Doen asseblief as volg:

1. Press Alt + F11 sleutels saam om die Microsoft Visual Basic vir aansoek venster oop te maak;

2. Kliek Plaas > module, en plak dan onder VBA-kode in die nuwe venster Module-venster.

VBA: Verdeel Word-dokument in verskeie dokumente deur Delimiter

Sub SplitNotes(delim As String, strFilename As String)
Dim doc As Document
Dim arrNotes
Dim I As Long
Dim X As Long
Dim Response As Integer
arrNotes = Split(ActiveDocument.Range, delim)
Response = MsgBox("This will split the document into " & UBound(arrNotes) + 1 & " sections.Do you wish to proceed?", 4)
If Response = 7 Then Exit Sub
For I = LBound(arrNotes) To UBound(arrNotes)
If Trim(arrNotes(I)) <> "" Then
X = X + 1
Set doc = Documents.Add
doc.Range = arrNotes(I)
doc.SaveAs ThisDocument.Path & "\" & strFilename & Format(X, "000")
doc.Close True
End If
Next I
End Sub
Sub test()
'delimiter & filename
SplitNotes "///", "Notes "
End Sub

3. Klik dan Run knoppie of druk F5 sleutel om die VBA toe te pas.

4. Klik in die Microsoft Word-dokument uit, kliek op die Ja-knoppie om voort te gaan.

let wel:
(1) Maak seker dat u afbakening dieselfde is as "///" In die sub toets na die dokument tussen elke afdeling teks wat u wil skei. Ook, jy kan verander "///" aan enige afbakkeerders om jou behoefte te bevredig.
(2) U kan die dokumente verander "Notes" in die sub toets om aan jou behoeftes te voldoen.
(3) En die splitsing dokumente sal op dieselfde plek gestoor word met die oorspronklike lêer.
(4) Jy hoef nie delimiter aan die einde van die oorspronklike lêer by te voeg nie. As jy dit doen, sal daar 'n leë dokument wees nadat jy gesplit het.


pyl blou regte borrel Verdeel Word dokument per bladsy met VBA

Hier is nog 'n VBA om jou te help om vinnig 'n Word-dokument te verdeel na veelvuldige bladsye in Word. Doen asseblief as volg:

1. Press Alt + F11 sleutels saam om die Microsoft Visual Basic vir aansoek venster oop te maak;

2. Kliek Plaas > module, en plak dan onder VBA-kode in die nuwe venster Module-venster.

VBA: Verdeel dokument in verskeie dokumente per bladsy in Word

Sub SplitIntoPages()
Dim docMultiple As Document
Dim docSingle As Document
Dim rngPage As Range
Dim iCurrentPage As Integer
Dim iPageCount As Integer
Dim strNewFileName As String
Application.ScreenUpdating = False 'Makes the code run faster and reduces screen _
flicker a bit.
Set docMultiple = ActiveDocument 'Work on the active document _
(the one currently containing the Selection)
Set rngPage = docMultiple.Range 'instantiate the range object
iCurrentPage = 1
'get the document's page count
iPageCount = docMultiple.Content.ComputeStatistics(wdStatisticPages)
Do Until iCurrentPage > iPageCount
If iCurrentPage = iPageCount Then
rngPage.End = ActiveDocument.Range.End 'last page (there won't be a next page)
Else
'Find the beginning of the next page
'Must use the Selection object. The Range.Goto method will not work on a page
Selection.GoTo wdGoToPage, wdGoToAbsolute, iCurrentPage + 1
'Set the end of the range to the point between the pages
rngPage.End = Selection.Start
End If
rngPage.Copy 'copy the page into the Windows clipboard
Set docSingle = Documents.Add 'create a new document
docSingle.Range.Paste 'paste the clipboard contents to the new document
'remove any manual page break to prevent a second blank
docSingle.Range.Find.Execute Findtext:="^m", ReplaceWith:=""
'build a new sequentially-numbered file name based on the original multi-paged file name and path
strNewFileName = Replace(docMultiple.FullName, ".doc", "_" & Right$("000" & iCurrentPage, 4) & ".doc")
docSingle.SaveAs strNewFileName 'save the new single-paged document
iCurrentPage = iCurrentPage + 1 'move to the next page
docSingle.Close 'close the new document
rngPage.Collapse wdCollapseEnd 'go to the next page
Loop 'go to the top of the do loop
Application.ScreenUpdating = True 'restore the screen updating
'Destroy the objects.
Set docMultiple = Nothing
Set docSingle = Nothing
Set rngPage = Nothing
End Sub 

3. Klik dan Run knoppie of druk F5 sleutel om die VBA toe te pas.

let wel: Die splitsing dokumente sal op dieselfde plek gestoor word met die oorspronklike lêer.


pyl blou regte borrel Verdeel Word dokument deur opskrif / bladsy / afdeling breek / bladsy breek met die gebruik van Kutools vir Word

As jy Kutools vir Word geïnstalleer het, kan jy dit toepas Split funksie om een ​​dokument maklik te verdeel in veelvuldige per bladsy, opskrif, afdeling breek of pouses soos jy dit nodig het in Word.

Kutools for Word is 'n handige invoegtoepassing om jou werk te vergemaklik en jou vermoë om woorddokument te verwerk, te verbeter. Gratis Trial vir 45 dae! Kry dit nou!

1. Kliek Kutools Plus > Split om die Split-funksie in te skakel.
doc split dokumente 001

2. In die opening Split-dialoog in die skerm, asseblief (1) spesifiseer die bestemmingsmap wat u die verdeel dokumente sal stoor in, (2) Kontroleer die kriteria wat u sal verdeel deur die Verdeel deur drop down lys, en (3) kliek op die OK knoppie. Sien skermkiekie:

En nou word die huidige Word-dokument verdeel volgens die gespesifiseerde kriteria (Opskrif 1 in my geval), en die bestemmingsmap maak outomaties oop met gesplete dokumente. Sien skermkiekie:
doc split dokumente 002

let wel: Hierdie fantastiese Split-funksie ondersteun ook verdeel een Word-dokument per bladsy, per bladsy breek, en deur afdeling breek maklik in Word. Sien onderstaande skermkiekies:

Verdeel een Word-dokument na veelvuldige per bladsy:

Verdeel een Word-dokument aan veelvuldige eenhede per bladsy breek:

Verdeel 'n Word-dokument aan meervoudiges volgens seksie breek:

Tabbladsye en redigering van verskeie Word-dokumente soos Firefox, Chrome, Internet Verken 10!

U kan bekend wees om verskeie webblaaie in Firefox / Chrome / IE te besigtig, en skakel tussen hulle deur maklik die ooreenstemmende oortjies te klik. Hier ondersteun Office Tab soortgelyke verwerking, wat jou toelaat om verskeie Word-dokumente in een Word-venster te blaai, en maklik oorskakel tussen hulle deur op hul oortjies te klik. Kliek vir volledige funksies gratis proeflopie!
Blaai deur meerdere woorddokumente in een venster as Firefox


pyl blou regte borrelRelatiewe artikels:

Voeg veelvuldige dokumente saam en hou formaat in woord




Kutools for Word

Meer as 100 Gevorderde funksies vir Word 2003, 2007, 2010, 2013, 2016 en 2019

shot-kutools-700-225-kte

Meer funksies | Gratis aflaai | Slegs $ 39.00 vir honderde funksies

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Maya · 1 months ago
    The split works great for me but on page in the merge file turns into 1.5 pages - something with the page layout (+ additional empty page at the end). any ideas how to go around that?
  • To post as a guest, your comment is unpublished.
    Lisa · 6 months ago
    The Split Word By Document with VBA worked for me, but it is adding a blank page at the end of each document. Is there a way around this?
    • To post as a guest, your comment is unpublished.
      Savvyno · 1 months ago
      I am working on this as well but have not found a way to do it besides manually.
    • To post as a guest, your comment is unpublished.
      Steve · 5 months ago
      Does not work at all for me. Goes through the motions but no documents are saved. Maybe because I am using .DOCX files?
      • To post as a guest, your comment is unpublished.
        Savvy · 1 months ago
        After playing with this code for over an hour I discovered you have to save the document you mail merged then you can run the code on the saved document that has all the pages you need to split up. Hope this helps.
        • To post as a guest, your comment is unpublished.
          Steve · 1 months ago
          I always start with a newly-saved document. I found the split documents were actually saved somewhere (I forget; doesn't matter) they were text only - all the formatting had been dropped.
      • To post as a guest, your comment is unpublished.
        Steve · 4 months ago
        Maybe something to do with Windows 7 settings? Thoughts from anyone?
  • To post as a guest, your comment is unpublished.
    Fenice · 7 months ago
    Mais comment garder une mise en page complexe (image de fond, marges, etc) ?
    Great but how to keep the lay-out (background image, margins ?)
  • To post as a guest, your comment is unpublished.
    Andrew · 8 months ago
    Can you split the document based on Heading 1 styles as your "delimiter".
    • To post as a guest, your comment is unpublished.
      kellytte · 2 months ago
      Hi Andrew,
      The VBA script can split the entire document by page. If you need to split by heading 1, we suggest to try Kutools for Word’s Split (Document) feature.
  • To post as a guest, your comment is unpublished.
    SHUBAM AWASTHI · 11 months ago
    i need to split the document using page range. for example i wanted to split 1 to 10 page in another document. how i can do it