,,,, in plaats van een dossier met de hand uit meerdere documenten worden omgezet, kunnen we de VBA - dossier.,, stap 1: volgens de alt-f11 "," met Microsoft, visuele toepassing raam; stap 2: klik,,, modules en in de etikettering, een kopie van de VBA en de volgende code pasta in de module ramen;,, stap 3: klik, en de werking van de toepassing van de VBA de VBA code:,,,, gesplitst in een aantal documenten op grond van het dossier afscheiders:,,,, - splitnotes (delim in touw, touw, strfilename), donkere, doc, arrnotes, donkere, donkere ik. Zolang de,,,,, X - lang.,,,,, voor de gehele donkere reactie, arrnotes = splitsing (activedocument.range, delim),,, reactie ("zal dit document = 'in" & UBound (arrnotes) + 1 &;". wil je blijven?"4), als de reactie = 7, en dan uit de,,, ik = LBound (arrnotes) tot UBound (arrnotes),,, als een (arrnotes (i) < > "en,,, X = X + 1,,,,, doc = documenten, dokter. Bereik = arrnotes (ik), en dit document, doc.saveas. Weg &" & strfilename & formaat (x miljoen),,,,,,, doc.close echt, als ik,,,,,, de laatste zoon test (),'delimiter & de naam,,,,, splitnotes "/", "pen", een einde te maken aan de,,,,,,,,, noot: 1.Je moet met de REËLE is hetzelfde, "/", en in elke periode van de tekst moet een onderscheid worden gemaakt tussen documenten van de test.Trouwens, je kunt veranderen, "/", geen scheidingsteken aan je behoeften.,, 2.Je kan veranderen in het dossier "op", in de sub - test aan uw behoeften.De resolutie van het dossier naar dezelfde plek, en de oorspronkelijke documenten, 4.Je hoeft niet toe te voegen aan de oorspronkelijke tekst van de REËLE aan het einde, als je dat doet, zal er een blanco document, na het uiteenvallen van de VBA.,, dit is de splitsing in één pagina 's dossier,,,,,, - splitintopages (), donkere, donkere, docmultiple documenten, docsingle documenten het toepassingsgebied van de rngpage donkere,,,,,, de donkere icurrentpage getallen, donkere ipagecount, getallen, donkere, strnewfilename.,,, application.screenupdating = valse "waardoor de code en de snelheid van de vermindering van het scherm - een punt _,,.,,, docmultiple = activedocument in de activiteiten _ werk document,,, (de) en de selectie van de,, rngpage = docmultiple. Reikwijdte van de concretisering van het voorwerp, icurrentpage = 1,,,,,,, "de bladzijden documenten, ipagecount = docmultiple computestatistics. Inhoud. (wdstatisticpages),,, doen icurrentpage * als icurrentpage; ipagecount,,,,, rngpage.end = ipagecount dan, de laatste pagina = activedocument.range.end" (geen volgende blz.), en andere,,, ", de volgende pagina begint,,,'must gebruik van keuze.Bereik. Naar methoden niet op een pagina 's, selection.goto, wdgotopage, wdgotoabsolute, icurrentpage + 1,,, om binnen de werkingssfeer van punt tussen de pagina' s, en ten slotte, rngpage.end = kiezen, te beginnen, als,,.,, ', rngpage.copy ramen klembord,,, docsingle = documenten bevat. De toevoeging van "het creëren van een nieuw document,,, docsingle.range.paste klembord pasta op de inhoud van de documenten, de nieuwe,'remove een handmatig breken, om te voorkomen dat de tweede Blanco,,, docsingle.range.find.execute findtext:=" ^ m "," ",,,: = volgnummer'build nieuwe naam op basis van de oorspronkelijke documenten - blz. De naam en het pad,,, strnewfilename = vervangen (docmultiple.fullname" DOC "," _ "& recht op $(' 000 '& icurrentpage, 4) &" DOC "), en, docsingle.Tenzij strnewfilename "behoud van nieuwe interne pagina 's, icurrentpage = icurrentpage + 1", op de volgende bladzijden, docsingle.close gesloten nieuwe documenten,,,,, rngpage.collapse wdcollapseend "naar de volgende pagina,,, verkeer te doen circuleren, op de Top van application.screenupdating = werkelijk herstel van het scherm, vernieuwing,,,,,,'destroy object, vaststelling van docmultiple = wat,,,,, docsingle = niet geregeld is, een einde te maken aan de rngpage =,,,,,,, noot: splitsing van het dossier worden bewaard in de oorspronkelijke documenten en op dezelfde plek, over deze code. Zie voor meer informatie:,,http://www.vbaexpress.com/kb/getarticle.php?Kb_id = 922 en http://www.vbaexpress.com/kb/getarticle.php?Kb_id = 727,,,,,,, voor de woorden uit het dossier, kutool meerdere documenten, als je niet bekend bent met het macro - en dit is een heel ingewikkelde gesplitst in een aantal documenten, door de VBA, maar kutools woord, splitsing, de functie, het je gemakkelijk kan worden onderverdeeld in een aantal dossiers.,,,, kutools woord en een vergemakkelijking van de toetreding, met inbegrip van instrumenten voor het verlichten van je werk en verbetering van de capaciteit van de behandeling van het dossier van je woorden.Gratis 45 dagen.Nu kan het.,,, alsjeblieft, voor de onderneming, door te klikken, > delen.Kijk 's:,,,,, stap 1: klik op ondernemingen >, splitsing, verschijnt op het scherm een dialoog.Kijk 's:,,,,, zie je het resultaat is als volgt:,,,,,,, noot: je bestanden kunnen worden opgedeeld in meerdere met de titel van het document (titel, voordat je te klikken, toevoeging van de titel, de etikettering en de keuze van een titel, een passage en pagina) (toevoeging van een symbool en ze klikken, opmaak, >, breuk, eerst de dossiers).,, ongeveer, meer gedetailleerde informatie kutools segmentering van de documenten, het woord, een bezoek aan de beschrijving van de kenmerken van de resolutie documenten:.,,,,