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.