Før den sidste lagring, eller når som helst du arbejder på et stort dokument i Word 2016, kan du overveje at rydde op i dokumentet. Det er en proces, der involverer søgning efter useriøse karakterer og anden problematisk tekst.
En dokumentoprydningsrutine involverer at søge efter mellemrum i slutningen af afsnit, dobbelte mellemrum, dobbelte tabulatorer og dobbelte Enter-taster (tomme afsnit). Det er alle ting, der skal undgås, men de ender alligevel i lange dokumenter.
Processen med at fjerne disse uønskede elementer involverer brug af dialogboksen Find og erstat. Du skal bruge knappen Special til at indtaste specialtegn, såsom Mellemrum, Tab og Enter.
Makroen, der blev oprettet til at udføre dokumentoprydningsarbejdet, registrerede de tastetryk, der blev brugt til at søge og erstatte de forskellige tegn. Derefter blev Visual Basic Editor brugt til at fjerne noget af den overflødige kode. Her er resultatet:
Sub document_cleanup()
'
' document_cleanup Makro
' Fjern efterfølgende mellemrum og dobbeltmellemrum, tabulatorer og Enter-taster
'
Selection.HomeKey Unit:=wdStory
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
Fjern mellemrum fra et afsnit
med Selection.Find
.Text = "^w^v"
.Replacement.Text = "^v"
.Forward = Sand
Slut med
Selection.Find.Execute Replace:=wdReplaceAll
' Fjern dobbeltmellemrum
Med Selection.Find
>.Text = " "
.Replacement.Text = " "
Slut med
Selection.Find.Execute Replace:=wdReplaceAll
' Fjern dobbeltfaner
Med Selection.Find
.Text = "^t^t"
.Replacement.Text = " ^t"
Afslut med
Selection.Find.Execute Replace:=wdReplaceAll
' Fjern dobbelte Enter-taster (blanke afsnit)
Med Selection.Find
.Text = "^v^v"
.Replacement.Text = "^v"
Slut med
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
Den første søg-og-erstat-operation fjerner efterfølgende mellemrum. Søgeteksten er ^w^v, som søger efter mellemrumstegn (^w) før Enter-tasten (^v). Disse mellemrumstegn - mellemrum, tabulator og så videre - erstattes med Enter-tasten, som fjerner de efterfølgende mellemrum.
Den anden søg-og-erstat fjerner dobbelte mellemrum. tryk på mellemrumstasten to gange for søgeteksten og tryk på mellemrumstasten en enkelt gang for at erstatte teksten.
Den tredje søg-og-erstat fjerner dobbeltfaner. ^t repræsenterer tabulatortegn i dialogboksen Find og erstat.
Den sidste søg-og-erstat fjerner tomme afsnit. ^v-tegnene repræsenterer Enter-tasten, så hvis du erstatter ^v^v med ^v, fjernes alle tomme afsnit.
Denne makro fungerer okay, men den kunne være bedre. For eksempel håndterer den ikke tredobbelte mellemrum eller tredobbelte tabulatorer. Du bliver nødt til at køre makroen en anden gang for det. Hvis du giver programmeringstalentet, kan makroens kode løse disse problemer.