Com escriure macros de Word 2016 per intercanviar elements de text

Quan treballeu amb documents a Word 2016, especialment amb els més llargs, voldreu la facilitat addicional i la FUNcionalitat de les macros que poden intercanviar paraules, frases o elements de text. Per crear macros, probablement necessitareu el llenguatge de programació Visual Basic per a aplicacions (VBA), que és vast, complex i intimidatori. Això vol dir que té un gran potencial, però no és una cosa que et sentis i aprendràs en una tarda informal.

Aquí teniu unes quantes macros d'"intercanvi" que us ajudaran a començar a personalitzar la vostra experiència de Word.

Intercanvi de paraules a Word 2016

Aquí teniu una macro pràctica que probablement utilitzareu tot el temps. La macro word_swap intercanvia dues paraules. Retalla la primera paraula i després l'enganxa després de la segona:

Sub word_swap()

'

' word_swap Macro ' Canvi de

dues paraules, esquerra-dreta

'

Selecció.Moveu a la dreta Unitat:=wdWord, Count:=1, Extend:=wdExtend

Selection.Cut

Selection.MoveRight Unit:=wdWord, Count:=1

Selection.Paste

End Sub

Aquestes pulsacions de tecla es van enregistrar per fer aquesta macro:

Ctrl+Maj+
La paraula a la dreta del cursor està seleccionada.

Ctrl+X
La paraula es talla.

Ctrl+
El cursor es mou després de la segona paraula.

Ctrl+V
S'enganxa la paraula original.

Les macros de Word no poden registrar els clics del ratolí. Quan necessiteu seleccionar text, utilitzeu les tecles del cursor més la tecla Maj, o utilitzeu la tecla F8 (selecció ampliada).

A més, perquè aquesta macro funcioni, el punter d'inserció s'ha de situar al començament de la primera paraula.

I/o intercanvi de paraules a Word 2016

Una altra macro d'intercanvi de paraules que probablement utilitzareu amb freqüència la macro and_or_word_swap . A diferència d'un intercanvi de paraules normal, l'objectiu d'aquesta macro és intercanviar paraules a banda i banda d'una conjunció. Per exemple, canviar això o allò per allò o això.

Igual que amb la macro word_swap , aquesta macro es va enregistrar des de l'entrada de tecla:

Sub i_o_intercanvi de paraules()

'

' and_or_word_swap Macro

' Canvia dues paraules en una conjunció

'

Selection.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend

Selection.Cut

Selection.MoveRight Unit:=wdWord, Count:=1

Selection.Paste

Selection.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend

Selection.Cut

Selection.MoveLeft Unit:=wdWord, Count:=2

Selecció.Enganxa

End Sub

Aquestes són les pulsacions de tecles utilitzades per gravar aquesta macro:

Ctrl+Maj+

Ctrl+X
Es retalla la primera paraula.

Ctrl+
El punter d'inserció salta per sobre de la conjunció i o o.

Ctrl+V
La paraula s'enganxa després de la conjunció.

Ctrl+Maj+

Ctrl+X
La paraula després de la conjunció (ara després de la primera paraula que heu enganxat al pas 4) està seleccionada i tallada.

Ctrl+, Ctrl+
El cursor es desplaça just abans de la conjunció.

Ctrl+V S'enganxa
la segona paraula.

L'efecte net d'aquestes dreceres de teclat és tallar una paraula a un costat d'un i o o i després enganxar la paraula a l'altre costat. A continuació, la segona paraula es retalla i s'enganxa abans dels i o o.

Perquè aquesta macro sigui efectiva, el punter d'inserció ha de parpellejar a l'inici de la primera paraula.

Canvia frases a Word 2016

De la mateixa manera que pots intercanviar dues paraules seguides, també pots intercanviar dues frases. La macro swap_sentences fa exactament això. I, com en altres macros de manipulació de text, utilitzeu el teclat, no el ratolí, per seleccionar text.

Al codi següent, l' ordre Selection.Extend representa prémer la tecla F8 del teclat. Quan premeu aquesta tecla tres vegades, es selecciona una frase.

Sub swap_sentences()

'

' swap_sentences Macro

' Canvia dues frases

'

Selecció.

Amplia la

selecció.

Amplia la

selecció.

Amplia la

selecció. Talla la selecció. Amplia la selecció. Amplia la selecció. Amplia la selecció.

Selection.EscapeKey

Selection.MoveRight Unit:=wdCharacter, Count:=1

Selection.Paste

End Sub

Aquí hi ha les pulsacions de tecles enregistrades per crear la macro swap_sentences :

F8, F8, F8
La frase actual està seleccionada.

Ctrl+X

F8, F8, F8
La següent frase està seleccionada.

Esc,
La selecció es cancel·la i el punter d'inserció es col·loca al començament de la següent frase.

Ctrl+V
La primera frase s'enganxa després de la segona.

Quan executeu aquesta macro, assegureu-vos que el punter d'inserció estigui situat en algun lloc de la primera frase.

Canvia el text de la capçalera i el peu de pàgina a Word 2016

La macro swap_header_footer intercanvia el text de la capçalera i el text del peu de pàgina del document. Podeu completar aquest procés manualment, però el problema és que la macro no registra amb precisió totes les accions. Així, tot i que podeu gravar les pulsacions bàsiques, heu de tornar a l'Editor de Visual Basic per completar la macro:

Sub swap_header_footer()

'

' swap_header_footer Macro

' Intercanvi de text de capçalera/peu de pàgina

'

Si ActiveWindow.View.SplitSpecial <> wdPaneNone Aleshores

ActiveWindow.Panes(2).Close

End Si

ActiveWindow.ActivePane.View.NormalView. O ActiveWindow. _

ActivePane.View.Type = wdOutlineView Aleshores

ActiveWindow.ActivePane.View.Type = wdPrintView

Final si

ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader

Selection.WholeStory

Selection.Cut

ActiveWindow.SeekViewer =SeekPane

. wdLine

Selection.Paste

Selection.EndKey Unit:=wdLine, Extend:=wdExtend

Selection.Cut

ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader

Selection.Paste

ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument

End Sub

L'efecte general d'aquesta macro és editar la capçalera del document, seleccionar i retallar tot aquest text i després canviar al peu. Un cop al peu de pàgina, s'enganxa el text de la capçalera i, a continuació, se selecciona i es retalla el text del peu de pàgina. La macro torna a la capçalera i enganxa el text del peu. A continuació, la macro tanca la capçalera.


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 […]