Video: Hoe schrijf ik een scriptie / thesis? door Dr. Kilian W. Wawoe 2024
Vóór die definitieve opslag, of wanneer u aan een groot document werkt in Word 2016, overweeg sommige documenten op te ruimen. Het is een proces waarbij je zoekt naar schurkenstaten en andere problematische teksten.
Een routine voor het opruimen van documenten bestaat uit het zoeken naar volgspaties aan het einde van alinea's, dubbele spaties, dubbele tabbladen en dubbele Enter-toetsen (lege alinea's). Dit zijn allemaal items die moeten worden vermeden, maar ze komen sowieso in lange documenten terecht.
Het elimineren van deze ongewenste elementen heeft te maken met het dialoogvenster Zoeken en vervangen. U moet de knop Special gebruiken om speciale tekens in te voeren, zoals Spatie, Tab en Enter.
De macro die is gemaakt om het opschoningsproces voor het document uit te voeren, heeft de toetsaanslagen opgenomen die voor het zoeken en vervangen van de verschillende tekens zijn gebruikt. Vervolgens werd de Visual Basic-editor gebruikt om een deel van de overtollige code te verwijderen. Dit is het resultaat:
Subdocument_cleanup ()
'
' document_cleanup Macro
'Verwijder volgruimten en dubbele spaties, tabbladen en Enter-toetsen
'
Selectie. HomeKey-eenheid: = wdStory
Selectie. Vind. ClearFormatting
Selectie. Vind. Vervanging. ClearFormatting
'Verwijder spaties uit een alinea
met selectie. Vind
. Tekst = "^ w ^ v"
. Vervanging. Tekst = "^ v"
. Doorsturen = Waar
Einde met
Selectie. Vind. Execute Replace: = wdReplaceAll
'Verwijder dubbele spaties
met selectie. Vind >>. Tekst = ""
. Vervanging. Tekst = ""
Einde met
Selectie. Vind. Execute Replace: = wdReplaceAll
'Verwijder dubbele tabbladen
met selectie. Vind
. Tekst = "^ t ^ t"
. Vervanging. Tekst = "^ t"
Einde met
Selectie. Vind. Execute Replace: = wdReplaceAll
'Verwijder dubbele Enter-toetsen (lege alinea's)
met selectie. Vind
. Tekst = "^ v ^ v"
. Vervanging. Tekst = "^ v"
Einde met
Selectie. Vind. Execute Replace: = wdReplaceAll
End Sub
De eerste search-and-replace-bewerking verwijdert volgspaties. De zoektekst is ^ w ^ v, die zoekt naar witruimte (^ w) tekens vóór de Enter-toets (^ v). Deze witruimtekarakters - spatie, tab enzovoort - worden vervangen door de Enter-toets, die de volgspaties verwijdert.
De tweede zoek-en-vervang verwijdert dubbele spaties. druk twee keer op de spatiebalk voor de zoektekst en druk één keer op de spatiebalk voor de vervangende tekst.
De derde zoek-en-vervang verwijdert dubbele tabbladen. De ^ t staat voor tabtekens in het dialoogvenster Zoeken en vervangen.
De laatste zoek-en-vervang verwijdert lege alinea's. De ^ v-tekens vertegenwoordigen de Enter-toets, dus het vervangen van ^ v ^ v door ^ v verwijdert lege alinea's.
Deze macro werkt goed, maar het kan beter. Het is bijvoorbeeld niet geschikt voor drievoudige spaties of drievoudige tabbladen. Hiervoor zou je de macro een tweede keer moeten uitvoeren. Als je het programmeertalent levert, kan de macrocode die problemen aanpakken.