Slik trekker du ut sider fra et Microsoft Word-dokument
Microsoft Word-dokumenter kan inneholde individuelle sider som passer bedre i egne dokumenter. For eksempel kan et dokument inneholde dusinvis av sider med skjemaer, hver av dem går mye til en egen avdeling for behandling. Hvis du vil pakke ut en individuell side, kan du kopiere den til en tom fil. Hvis du vil pakke ut alle dokumentets sider, må du kopiere og lime inn hver enkelt fil, noe som kan ha mye tid og krefter. Du kan imidlertid automatisere ekstraksjonsprosessen ved å skrive en Visual Basic-makro.
1.
Trykk "Alt-F11" for å åpne Words Visual Basic-editor.
2.
Klikk modulen "NewMacros" i Prosjektvinduets Moduler-mappe, hvis Word ikke åpner det automatisk.
3.
Skriv inn følgende for å åpne en ny makro:
Sub mcrExtractPages ()
4.
Legg til følgende kode for å angi makroen for å bla gjennom dokumentet etter side:
Application.Browser.Target = wdBrowsePage
5.
Legg til følgende kode, som åpner en sløyfe som kjører på hver side i dokumentet:
For i = 1 Til ActiveDocument.BuiltInDocumentProperties ("Antall sider")
6.
Legg til følgende for å kopiere innholdet på den valgte siden:
ActiveDocument.Bookmarks ( "\ side"). Range.Copy
7.
Legg til følgende kode for å opprette et nytt dokument:
Documents.Add
8.
Legg til følgende kode for å lime inn den kopierte koden i det nye dokumentet:
Selection.Paste
9.
Legg til følgende kode for å angi katalogen der Word vil lagre de ekstraherte sidene:
ChangeFileOpenDirectory "C: \ Users \ Ryan \ Documents"
10.
Endre "C: \ Users \ Ryan \ Documents" til hvilken katalog du vil ha.
11.
Legg til følgende kode for å lagre det nye dokumentet som en ny fil i den valgte katalogen:
DocNum = DocNum + 1 ActiveDocument.SaveAs FileName: = "ExtractedPage_" & DocNum & ".docx"
12.
Endre "ExtractedPage_" til hvilket navn du vil tilordne de ekstraherte sidene.
1. 3.
Legg til følgende kode for å lukke det nye dokumentet og gå til hoveddokumentets neste side:
ActiveDocument.Close Application.Browser.Next
14.
Legg til følgende kode for å lukke sløyfen:
Neste jeg
15.
Legg til følgende kode for å lukke makroen:
Slutt Sub
16.
Trykk "F5" for å kjøre makroen.
Tips
- Lagre makroen når du har hentet ut sidene dine. I fremtiden kan du kjøre den lagrede makroen for å trekke ut flere dokumentsider.
Populære Innlegg
Et grafisk brukergrensesnitt er et datagrensesnitt som lar brukerne kommunisere med en enhet gjennom grafiske elementer som bilder og animasjoner, i motsetning til tekstbaserte kommandoer. GUIer er mye brukt i både personlig og forretningsmessig databehandling, da de tilbyr en intuitiv og iøynefallende metode for å kontrollere elektroniske enheter. D
Les Mer
Tekstverktøyene i Microsoft Word 2010 kan bidra til å legge til litt flair i dokumentene dine. Et av tekstverktøyene lar deg skrive langs en sti, inkludert en kurve. Du oppretter buet tekst i en tekstboks som inneholder forskjellige verktøy du kan bruke til å forvandle kurven. Du kan også gjøre alle standardendringene til teksten på kurven, inkludert skrifttype, skriftstørrelse og teksteffekter. 1. Klik
Les Mer
Diesel reparasjonsselskaper er avgjørende for bilindustrien, og gir diagnostiske og reparasjonstjenester for dieseldrevne systemer som driver biler, lastebiler, busser og tungt maskineri. Mange faktorer spiller roller i å bestemme hvor vanskelig det er å starte og styre et vellykket dieselreparasjonsfirma. T
Les Mer
Når du skriver inn et søkeord eller en URL-adresse i adressefeltet, samler nettleseren ofte en liste over foreslåtte vilkår eller nettsteder basert på nettleserloggen. Denne listen vil strekke seg ned fra adressefeltet. Juster nettleserens alternativer for å slette nettlesingsloggen og slutte å forutsi søkevalg. Deakti
Les Mer
Som eier av en bedrift vet du sikkert at noen ganger er den enkleste og raskeste måten å kommunisere med salgsstyrken din ved å skrive et brev, som i siste instans kan ta form av en e-post. Enten du skriver for å kommunisere en endring i prosedyren eller for å lage en personell kunngjøring, lage et brev som er konsistent. Tros
Les Mer