Před tímto konečným uložením nebo kdykoli pracujete na velkém dokumentu ve Wordu 2016, zvažte provedení vyčištění dokumentu. Je to proces, který zahrnuje vyhledávání nepoctivých postav a jiného problematického textu.
Rutina čištění dokumentu zahrnuje hledání koncových mezer na konci odstavců, dvojitých mezer, dvojitých tabulátorů a dvojitých kláves Enter (prázdné odstavce). To vše jsou položky, kterým je třeba se vyhnout, ale stejně skončí v dlouhých dokumentech.
Proces eliminace těchto nežádoucích prvků zahrnuje použití dialogového okna Najít a nahradit. Chcete-li zadat speciální znaky, jako je mezera, tabulátor a Enter, musíte použít tlačítko Special.
Makro vytvořené k provedení čištění dokumentu zaznamenalo úhozy používané k vyhledávání a nahrazování různých znaků. Potom byl editor jazyka Visual Basic použit k odstranění části nadbytečného kódu. Zde je výsledek:
Sub document_cleanup()
'
' document_cleanup Macro
' Odstraňte koncové mezery a dvojité mezery, tabulátory a klávesy Enter
'
Selection.HomeKey Unit:=wdStory
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
' Odstraňte koncové mezery z odstavce
pomocí Selection.Find
.Text = "^w^v"
.Replacement.Text = "^v"
.Forward = Pravda
Konec s
Selection.Find.Execute Nahradit:=wdReplaceAll
' Odebrat dvojité mezery
S Selection.Find
>.Text = " " .Replacement.Text =
" "
Končí na
Selection.Find.Execute Nahradit:=wdReplaceAll
Odstraňte dvojité záložky
S Selection.Find
.Text = "^t^t"
.Replacement.Text = "^t"
End With
Selection.Find.Execute Nahradit:=wdReplaceAll
Odebrat dvojité klávesy Enter (prázdné odstavce)
S Selection.Find
.Text = "^v^v"
.Replacement.Text = "^v"
Konec s
Selection.Find.Execute Nahradit:=wdReplaceAll
End Sub
První operace hledání a nahrazení odstraní koncové mezery. Hledaný text je ^w^v, který hledá všechny mezery (^w) před klávesou Enter (^v). Tyto mezery – mezera, tabulátor atd. – jsou nahrazeny klávesou Enter, která odstraňuje koncové mezery.
Druhé hledání a nahrazování odstraní dvojité mezery. stiskněte mezerník dvakrát pro hledaný text a jednou stiskněte mezerník pro nahrazený text.
Třetí funkce hledání a nahrazování odstraní dvojité karty. ^t představuje znaky tabulátoru v dialogovém okně Najít a nahradit.
Poslední hledání-a-nahradit odstraní prázdné odstavce. Znaky ^v představují klávesu Enter, takže nahrazení ^v^v za ^v odstraní všechny prázdné odstavce.
Toto makro funguje dobře, ale mohlo by být lepší. Nezvládá například trojité mezery nebo trojité tabulátory. K tomu byste museli makro spustit podruhé. Pokud poskytnete programátorský talent, kód makra může tyto problémy vyřešit.