Tipp: Az egyéb nyelvek a Google Fordítva vannak. Látogasson el a English a link verziója.
Belépek
x
or
x
x
Regisztráció
x

or

Hogyan kell a dokumentumot több dokumentumba osztani szóban?

Ha hatalmas szószöveg van, amelyet több dokumentumra kell osztani, akkor néhány percet kell elolvasnia az útmutató megtekintéséhez. Ez a bemutató két módszert jelenít meg egy dokumentum több dokumentumba való felosztására.

Split Word dokumentum meghatározott elhatároló a VBA

Split Word dokumentum oldalanként a VBA-val

Split Word dokumentumot cím / oldal / szakasz szünet / oldal szünet a Kutools for Word használatával

Könnyen szétoszthatja egy Word-dokumentumot többször is oldalra, szekcióra / oldalra szakadva, vagy egyszerre rögtön!

Összehasonlítva a Word dokumentum másolásával és beillesztésével történő megosztásával, a Kutools for Word megkönnyíti a munkát és javítja a munka hatékonyságát drámaian a Splitter funkció révén, amely gyorsan osztja az aktuális nyitó Word dokumentumot többször is oldalanként, szétosztás szerint, oldalanként szünetet, vagy az 1 fejlécet, amire szüksége van. Kattintson az 60 napos ingyenes próbaverzióra!
hirdetés osztott dokumentumokat oldalanként

Kutools for Word: Add hozzá az 100 új fejlett funkcióit a 2003 / 2007 / 2010 / 2013 / 2016 / 2019 szóhoz.
Office Tab: Engedélyezze Táblát szerkeszteni és böngészni az irodában, Csakúgy, mint a Chrome, a Firefox, az IE 8 / 9 / 10.
Klasszikus menü az Office számára: Hozd az Office 2003 Back Look-ot az Office 2007, az 2010, az 2013, az 2016 és az 2019.

arrow kék jobb buborék Split Word dokumentum meghatározott elhatároló a VBA

Ahelyett, hogy a dokumentumot manuálisan több dokumentumba feldarabolná, ez a módszer egy VBA-t vezet be, hogy egy Word-dokumentumot szétváljon a megadott határolóban a Word-ben. Kérjük, tegye a következőket:

1. nyomja meg Alt + F11 gombokat a Microsoft Visual Basic for Application ablak megnyitásához;

2. Kattints betétlap > Modulok, majd illessze be a VBA kód alá az új nyitó modul ablakot.

VBA: Szétválasztott Word-dokumentum több dokumentumba a Delimiter segítségével

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. Ezután kattintson futás gombot, vagy nyomja meg az F5 gombot a VBA alkalmazásához.

4. A Microsoft Word dokumentum kipipálásakor kattintson az Igen gombra a folytatáshoz.

Jegyzet:
(1) Ügyeljen arra, hogy a határolóját ugyanaz, mint a "///" a másodlagos tesztben a dokumentumhoz, amelyet a különálló szövegrészek között szeretnél elkülöníteni. Továbbá változtathat "///" minden igényt kielégítő határolóhoz.
(2) Megváltoztathatja a dokumentumokat „Megjegyzések” az al Testben, hogy megfeleljen az Ön igényeinek.
(3) A megosztási dokumentumok az eredeti fájlhoz ugyanazon a helyen lesznek elmentve.
(4) Nem szükséges hozzáfűzni az eredeti fájl végét, ha igen, akkor a megosztás után üres dokumentum lesz.


arrow kék jobb buborék Split Word dokumentum oldalanként a VBA-val

Itt van egy másik VBA, amely segít Önnek gyorsan felosztani egy Word-dokumentumot több oldalra a Word-ben. Kérjük, tegye a következőket:

1. nyomja meg Alt + F11 gombokat a Microsoft Visual Basic for Application ablak megnyitásához;

2. Kattints betétlap > Modulok, majd illessze be a VBA kód alá az új nyitó modul ablakot.

VBA: Több dokumentumra osztja a dokumentumot a Word-ben

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. Ezután kattintson futás vagy nyomja meg a gombot F5 kulcs a VBA alkalmazására.

Jegyzet: A felosztási dokumentumok ugyanarra a helyre lesznek mentve az eredeti fájlhoz.


arrow kék jobb buborék Split Word dokumentumot cím / oldal / szakasz szünet / oldal szünet a Kutools for Word használatával

Ha telepítette a Kutools for Word programot, alkalmazhatja Hasított funkció segítségével könnyen szétválaszthatja az egyik dokumentumot több oldalra, oldalra, fejlécre, szakasztörésre vagy oldaltörésre, amire szüksége van a Word-ben.

Kutools for Word egy praktikus kiegészítő, amely megkönnyíti a munkát és növeli a Word dokumentum feldolgozásának képességét. Ingyenes próba az 45 napokra! Szerezd meg most!

1. Kattints Kutools Plus > Hasított a Split funkció engedélyezéséhez.
doc split dokumentumok 001

2. A képernyő Megnyitás párbeszédablakában kérjük (1) adja meg a rendeltetési mappát, amelybe az osztott dokumentumokat elmenti, (2) ellenőrizze a kritériumokat, amelyeket a Split by legördülő listát, és (3) kattintson a OK gomb. Lásd a képernyőképet:

És most az aktuális Word-dokumentumot a megadott kritériumok osztják (1 címsor az én esetemben), és a célmappa automatikusan megnyílik osztott dokumentumokkal. Lásd a képernyőképet:
doc split dokumentumok 002

Jegyzet: Ez a fantasztikus Splitter funkció is támogatja az osztott Word dokumentumot oldalanként, oldaltörés és szakaszosan szünetelteti a Word-ben. Lásd az alábbi képeket:

Egy Word-dokumentumot több oldalra szétosztott oldalanként:

Egy Word-dokumentumot több oldalra osztva oldaltöréssel:

Egy Word-dokumentumot szétválogasson többszörösre:

Több Word dokumentum böngészése és szerkesztése Firefoxban, Chrome-ban, Interneten Explore 10!

Lehet, hogy ismerős több weboldalt megtekinteni a Firefox / Chrome / IE-ben, és váltani köztük a megfelelő fülekre kattintva. Itt az Office Tab támogatja a hasonló feldolgozást, amely lehetővé teszi, hogy egy Word ablakban több Word dokumentumot böngészhessen, és egyszerűen átkapcsolhat közöttük a füleire kattintva. Kattintson a teljes funkciók ingyenes próbaverzió!
Több szöveges dokumentum böngészése egy ablakban Firefoxban


arrow kék jobb buborékRelatív cikkek:

Több dokumentum egyesítése és szó formában tartása




Kutools for Word

Több mint 100 Fejlett funkciók a Word 2003, 2007, 2010, 2013, 2016 és 2019

shot-kutools-700-225-KTE

További funkciók | ingyenes letöltés | Csak $ 39.00 több száz funkcióért

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 · 4 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