Com escriure macros de neteja de documents a Word 2016

Abans d'aquest desament final, o en qualsevol moment que esteu treballant en un document gran a Word 2016, penseu a fer una mica de neteja del document. És un procés que implica la recerca de personatges canalla i altres textos problemàtics.

Una rutina de neteja de documents implica cercar espais al final dels paràgrafs, espais dobles, tabulacions dobles i tecles dobles d'entrada (paràgrafs buits). Tots aquests són elements que cal evitar, però de totes maneres acaben en documents llargs.

El procés d'eliminació d'aquests elements no desitjats implica utilitzar el quadre de diàleg Cerca i substitueix. Heu d'utilitzar el botó Especial per introduir caràcters especials, com ara espai, tabulació i Intro.

La macro creada per realitzar la tasca de neteja del document va registrar les pulsacions de tecles utilitzades per cercar i substituir els diferents caràcters. A continuació, es va utilitzar l'Editor Visual Basic per eliminar part del codi redundant. Aquí teniu el resultat:

Sub document_cleanup()

'

' document_cleanup Macro

' Elimina els espais finals i els espais dobles, les tabulacions i les tecles Enter

'

Selection.HomeKey Unit:=wdStory

Selection.Find.ClearFormatting

Selection.Find.Replacement.ClearFormatting

' Elimina els espais finals d'un paràgraf

amb Selecció.Cerca

.Text = "^w^v"

.Replacement.Text = "^v"

.Forward = True

Acaba amb

Selection.Find.Execute Replace:=wdReplaceAll

' Elimina els espais dobles

Amb Selecció.Trobar

>.Text = " "

.Replacement.Text = " "

Finalitza amb

Selection.Find.Execute Replace:=wdReplaceAll

' Traieu les dobles pestanyes

Amb Selection.Find

.Text = "^t^t"

.Replacement.Text = " ^t"

Acaba amb

Selection.Find.Execute Replace:=wdReplaceAll

' Elimina les tecles d'entrada dobles (paràgrafs en blanc)

Amb Selection.Find

.Text = "^v^v"

.Replacement.Text = "^v"

Acaba amb

Selection.Find.Execute Replace:=wdReplaceAll

End Sub

La primera operació de cerca i substitució elimina els espais finals. El text de cerca és ^w^v, que cerca qualsevol caràcter d'espai en blanc (^w) abans de la tecla Intro (^v). Aquests caràcters d'espai en blanc (espai, tabulació, etc.) es substitueixen per la tecla Intro, que elimina els espais al final.

La segona cerca i substitució elimina els espais dobles. premeu la barra espaiadora dues vegades per al text de cerca i premeu la barra espaiadora una sola vegada per al text de substitució.

La tercera cerca i substitució elimina les dobles pestanyes. La ^t representa els caràcters de tabulació al quadre de diàleg Cerca i substitueix.

La cerca i substitució final elimina els paràgrafs buits. Els caràcters ^v representen la tecla Intro, de manera que substituint ^v^v per ^v s'eliminarà qualsevol paràgraf buit.

Aquesta macro funciona bé, però podria ser millor. Per exemple, no gestiona espais triples ni tabulacions triples. Hauríeu d'executar la macro una segona vegada per a això. Si proporcioneu el talent de programació, el codi de la macro pot resoldre aquests problemes.


Com bloquejar Microsoft Word dobrir fitxers en mode només de lectura a Windows

Com bloquejar Microsoft Word dobrir fitxers en mode només de lectura a Windows

Com bloquejar Microsoft Word d'obrir fitxers en mode de només lectura a Windows Microsoft Word obre fitxers en mode de només lectura, cosa que fa que sigui impossible editar-los? No us preocupeu, els mètodes es mostren a continuació

Com solucionar la impressió incorrecta de documents de Microsoft Word

Com solucionar la impressió incorrecta de documents de Microsoft Word

Com corregir errors en imprimir documents incorrectes de Microsoft Word Els errors en imprimir documents de Word amb tipus de lletra canviats, paràgrafs desordenats, falta de text o contingut perdut són força habituals. No obstant això, no

Esborra els dibuixos de llapis i ressaltats a les teves diapositives de PowerPoint

Esborra els dibuixos de llapis i ressaltats a les teves diapositives de PowerPoint

Si heu utilitzat el llapis o el marcador per dibuixar a les vostres diapositives de PowerPoint durant una presentació, podeu desar els dibuixos per a la següent presentació o esborrar-los de manera que la propera vegada que el mostreu, començareu amb diapositives de PowerPoint netes. Seguiu aquestes instruccions per esborrar dibuixos a llapis i ressaltadors: Esborrant línies una a […]

Contingut de la biblioteca destils a SharePoint 2010

Contingut de la biblioteca destils a SharePoint 2010

La biblioteca d'estils conté fitxers CSS, fitxers de llenguatge de full d'estil extensible (XSL) i imatges utilitzades per pàgines mestres predefinides, dissenys de pàgina i controls a SharePoint 2010. Per localitzar fitxers CSS a la biblioteca d'estils d'un lloc de publicació: Trieu Accions del lloc→Visualitza Tot el contingut del lloc. Apareix el contingut del lloc. La biblioteca d'estil es troba a […]

Formateu els números en milers i milions als informes dExcel

Formateu els números en milers i milions als informes dExcel

No desbordeu el vostre públic amb números gigantesques. A Microsoft Excel, podeu millorar la llegibilitat dels vostres taulers i informes formatant els vostres números perquè apareguin en milers o milions.

Com compartir i seguir els llocs de SharePoint

Com compartir i seguir els llocs de SharePoint

Apreneu a utilitzar les eines de xarxes socials de SharePoints que permeten a persones i grups comunicar-se, col·laborar, compartir i connectar-se.

Com convertir les dates a formats Julian a Excel

Com convertir les dates a formats Julian a Excel

Les dates julianes s'utilitzen sovint en entorns de fabricació com a marca de temps i referència ràpida per a un número de lot. Aquest tipus de codificació de dates permet als minoristes, consumidors i agents de serveis identificar quan es va fabricar un producte i, per tant, l'antiguitat del producte. Les dates julianes també s'utilitzen en programació, militars i astronomia. Diferents […]

Com crear una aplicació web daccés

Com crear una aplicació web daccés

Podeu crear una aplicació web a Access 2016. Què és, de totes maneres, una aplicació web? Bé, web vol dir que està en línia i l'aplicació és només una abreviatura de "aplicació". Una aplicació web personalitzada és una aplicació de base de dades en línia a la qual s'accedeix des del núvol mitjançant un navegador. Creeu i manteniu l'aplicació web a la versió d'escriptori […]

Barra dinici ràpid a SharePoint 2010

Barra dinici ràpid a SharePoint 2010

La majoria de les pàgines del SharePoint 2010 mostren una llista d'enllaços de navegació a la barra d'inici ràpid al costat esquerre de la pàgina. La barra d'inici ràpid mostra enllaços al contingut del lloc destacat, com ara llistes, biblioteques, llocs i pàgines de publicació. La barra d'inici ràpid inclou dos enllaços molt importants: Enllaç de tot el contingut del lloc: el […]

Què signifiquen els missatges derror del solucionador a Excel?

Què signifiquen els missatges derror del solucionador a Excel?

Per a problemes senzills, Solver a Excel sol trobar ràpidament els valors òptims de la variable Solver per a la funció objectiu. Però, en alguns casos, Solver té problemes per trobar els valors de la variable Solver que optimitzen la funció objectiu. En aquests casos, Solver normalment mostra un missatge o un missatge d'error que descriu o discuteix el problema que […]