Vai esat noguris no atkārtotu uzdevumu veikšanas programmā Microsoft Word? Apglabāts programmā ir spēcīgs automatizācijas rīks, kas var noņemt šos darbus no rokām. Mēs runājam par makro, un, lai gan šī funkcija ir balstīta uz Microsoft Visual Basic for Applications (VBA), jūs varat to izmantot pat tad, ja kodēšanas ideja dod jums heebie-jeebies.

Noklikšķinot uz pogas, Word ierakstīs jūsu darbības, izveidojot makro, kuru varat atkārtot tik bieži, cik vēlaties. Ja esat azartisks, varat viegli modificēt makro, lai iegūtu papildu automatizācijas pakāpi.

Šeit mēs parādīsim vienu vienkāršu, bet noderīgu piemēru: Kā automatizēt Word funkciju Atrast un aizstāt.

Makro ierakstīšana

Šajā piemērā jūs esat cienījamais Seno zobārstniecības ierīču saglabāšanas biedrības prezidents. Jums ir desmitiem Word dokumentu par vēsturiskām zobu protēžām un tamlīdzīgiem, un visi šie vārdi ir skaidri minēti. Tad pēkšņi valde nobalso par nosaukuma maiņu uz Zobu senlietu saglabāšanas līgu. Tagad jums ir nepieciešams vienkāršs veids, kā atjaunināt dokumentus.

Jūs varat sākt ar jaunu tukšu dokumentu vai atvērt esošu. Ja vēl neesat to izdarījis, jums būs jāiespējo cilne Izstrādātājs.

Iet uz Fails> Opcijas> Pielāgot lenti. Labajā pusē zem Galvenās cilnes, pārbaudiet Izstrādātājs opcija. Atlasiet Labi un izejiet.

Tagad izveidosim savu makro.

  1. Klikšķis Izstrādātājs> Ierakstīt makro.
  2. Jums tiks piedāvāts nosaukt makro. Ievadiet “ChangeSocietyName” vai jebkuru citu jums piemērotu nosaukumu. Nosaucot makro, izvairieties no atstarpēm, punktiem, izsaukuma zīmēm un īpašajām rakstzīmēm, pretējā gadījumā tiks parādīts kļūdas ziņojums. Varat izmantot ciparus, bet pirmajai rakstzīmei jābūt burtam.
  3. Varat piešķirt makro pogas un / vai īsinājumtaustiņam, taču tā nav prasība. Ja izvēlēsities pogu, Word ļaus to pievienot ātrās piekļuves rīkjoslai. Varat arī pievienot īsu makro aprakstu.
  4. Klikšķis labi, un Word tagad ierakstīs jūsu darbības. Sist Ctrl + H audzināt Atrodiet un nomainiet dialoglodziņš.
  5. Atrodiet “Antīko zobārstniecības ierīču saglabāšanas biedrība” sadaļā “Atrast” un “Zobu antīko priekšmetu saglabāšanas līga” sadaļā “Aizstāt”.
  6. Klikšķis Aizstāt visu lai veiktu operāciju Atrast un aizstāt. Šī ir vienīgā darbība, kuru vēlaties ierakstīt. Nav svarīgi, vai makro faktiski aizstāj kādu tekstu. Punkts ir saglabāt to citiem dokumentiem.
  7. Tas ir svarīgi: Noklikšķiniet Izstrādātājs> Pārtraukt ierakstīšanu. Pretējā gadījumā makro iekļaus visas turpmākās darbības.

Tagad apskatīsim jūsu roku darbu. Atveriet dokumentu, kurā norādīts biedrības nosaukums. Klikšķis Izstrādātājs> Makro. Veicot dubultklikšķi uz ChangeSocietyName, Word automātiski veiks darbību Atrast un aizstāt.

Padoms: Ierakstot makro, jums, iespējams, būs jāveic darbība, kuru nevēlaties ierakstīt. Piemēram, jūs varat iekopēt un ielīmēt tekstu dialoglodziņā Atrast un aizstāt, nevis manuāli ierakstīt. Nav problēmu: vienkārši noklikšķiniet Izstrādātājs> Pārtraukt ierakstīšanu, nokopējiet un ielīmējiet tekstu, pēc tam noklikšķiniet uz Izstrādātājs> Atsākt ierakstītāju. Tad jūs varat pabeigt makro ierakstīšanu, kā aprakstīts iepriekš.

Lai gan mēs šeit koncentrējāmies uz Microsoft Word, jūs varat arī izmantojiet makro, lai palielinātu Excel produktivitāti. Un to ir daudz laika taupīšanas makro Microsoft OneNote.

Kā ierakstīt makro programmā Excel 2016

Vai zinājāt, ka jūs varat automatizēt atkārtotus uzdevumus programmā Microsoft Excel, izmantojot makro? Mēs parādīsim, kā ierakstīt makro programmā Excel 2016, lai ietaupītu daudz laika.

Niršana kodeksā

Tagad mēs iedziļināsimies savā jaunajā Word makro. Iet uz Izstrādātājs> Makro, bet tā vietā, lai veiktu dubultklikšķi uz makro, atlasiet to un noklikšķiniet Rediģēt. Tādējādi tiek atvērts Visual Basic redaktors - pašpietiekama vide VBA lietojumprogrammu veidošanai.

Tas var izskatīties biedējoši, taču jūs varat ignorēt izvēlnes un lielāko daļu paneļu. Tā vietā koncentrējieties uz logu, kurā ir kods. Kā redzat, Word tikko ir uzrakstījis makro, kas veic meklēšanu un aizstāšanu.


Sub ChangeSocietyName ()
'
'ChangeSocietyName Macro
Pārdēvēt biedrību par antīko zobārstniecības ierīču saglabāšanu
'
Atlase. Atrodiet. ClearFormatting
Atlase. Atrodiet. Aizstāšana. ClearFormatting
Ar atlasi. Atrodiet
.Text = "Antīko zobārstniecības ierīču saglabāšanas biedrība"
.Nomainīšana. Teksts = "Zobu senlietu saglabāšanas līga"
.Priekšu = True
.Wrap = wdFindContinue
.Formāts = Nepatiesa
.MatchCase = Nepatiesa
.MatchWholeWord = Nepatiesa
.MatchWildcards = Nepatiesa
.MatchSoundsLike = Nepatiesa
.MatchAllWordForms = Nepatiesa
Beigt ar
Atlase. Atrodiet. Izpildīt Replace: = wdReplaceAll
Beigu apakšnodaļa

Paskaidrosim, kas šeit notiek.

Pirmajā rindā esošais “apakšsadaļa” ir saīsinājums no “apakšprogramma” - mazas programmas, kas var darboties atsevišķi vai kā daļa no lielākas VBA lietojumprogrammas. Rindas, pirms kurām ir vienas pēdiņas, ir domātas komentāriem. Pēdiņas liek VBA ignorēt visus apgalvojumus šajās rindās.

Tad mēs nonākam pie koda gaļas: koda, kas veic Atrodiet un nomainiet darbība. Kā redzat, dialoglodziņā Atrast un aizstāt katrai opcijai ir norādītas vērtības, ieskaitot tekstu un aizstājējtekstu pēdiņās. The Atlase. Atrodiet. Izpildīt komanda tuvu beigām ir līdzvērtīga pogas “Aizstāt visu” noklikšķināšanai.

Makro pārveidošana

Lai izmantotu makro, jums nav jājaucas ar kodu vai pat jāaplūko tas. Bet jūs varat iegūt vairāk no šīs funkcijas, ja esat gatavs ienirt. Piemēram, pieņemsim, ka, ierakstot makro, esat izdarījis drukas kļūdu. Tā vietā, lai to atkārtoti ierakstītu, varat pāriet uz Visual Basic un salabot.

Varat arī pielāgot makro, lai tas būtu noderīgāks, un to mēs šeit darīsim. Palaižot Atrast un nomainīt manuāli vai izmantojot makro, Word atceras meklēšanas un aizstāšanas tekstu. Nākamreiz, kad atvērsit dialogu Atrast un aizstāt, tas izskatīsies šādi.

Labāk būtu notīrīt vērtības, lai mēs iegūtu tīru dialoglodziņu. Mēs to darīsim ar otru makro, izņemot šo laiku, mēs to darīsim tieši Visual Basic.

  1. Visual Basic redaktorā atlasiet visu apakšprogrammu no pirmās rindas līdz End Sub. Sist Ctrl + C lai to nokopētu.
  2. Novietojiet kursoru zem End Sub un nospiediet Ctrl + V. Jūs tikko dublējāt apakšprogrammu.
  3. Mainiet nosaukumu no ChangeSocietyName uz ClearFindReplace (vai jebkuru citu jums piemērotu nosaukumu). Tas ir svarīgi, jo, mēģinot palaist makro ar dublētiem nosaukumiem, VBA ģenerēs kļūdas ziņojumu.
  4. Iekš .Teksts un Aizstāšana. Teksts vērtības, noņemiet tekstu, bet atstājiet pēdiņas. Būtībā jūs sakāt, lai Word neko neatrod un aizstāj ar neko, bet jūs arī noskaidrojat šīs vērtības.

Rezultātam vajadzētu izskatīties šādi:


Sub ClearFindReplace ()
'
'ClearFindReplace Macro
'Notīrīt tekstu no dialoglodziņa Atrast un aizstāt
'
Atlase. Atrodiet. ClearFormatting
Atlase. Atrodiet. Aizstāšana. ClearFormatting
Ar atlasi. Atrodiet
.Text = ""
.Nomainīšana. Teksts = ""
.Priekšu = True
.Wrap = wdFindContinue
.Formāts = Nepatiesa
.MatchCase = Nepatiesa
.MatchWholeWord = Nepatiesa
.MatchWildcards = Nepatiesa
.MatchSoundsLike = Nepatiesa
.MatchAllWordForms = Nepatiesa
Beigt ar
Atlase. Atrodiet. Izpildīt Replace: = wdReplaceAll
Beigu apakšnodaļa

Tagad mēs atgriezīsimies pie makro ChangeSocietyName. Zem koda Atrast un aizstāt, bet pirms End Sub ievadiet ClearFindReplace (bez iekavām beigās).

Pareizi: jums nav jāievada viss tikko izveidotais kods, tikai makro nosaukums.


Sub ChangeSocietyName ()
'
'ChangeSocietyName Macro
Pārdēvēt biedrību par antīko zobārstniecības ierīču saglabāšanu
'
Atlase. Atrodiet. ClearFormatting
Atlase. Atrodiet. Aizstāšana. ClearFormatting
Ar atlasi. Atrodiet
.Text = "Antīko zobārstniecības ierīču saglabāšanas biedrība"
.Nomainīšana. Teksts = "Zobu senlietu saglabāšanas līga"
.Priekšu = True
.Wrap = wdFindContinue
.Formāts = Nepatiesa
.MatchCase = Nepatiesa
.MatchWholeWord = Nepatiesa
.MatchWildcards = Nepatiesa
.MatchSoundsLike = Nepatiesa
.MatchAllWordForms = Nepatiesa
Beigt ar
Atlase. Atrodiet. Izpildīt Replace: = wdReplaceAll
ClearFindReplace
Beigu apakšnodaļa

Kad Word palaiž ChangeSocietyName, vispirms tas izpildīs sākotnējo funkciju Atrast un aizstāt. Tad tas interpretēs ClearFindReplace kā komandu, lai palaistu otro makro.

Ejam tālāk ar VBA

Kā redzat, Word makro ierakstīšanas funkcija var palīdzēt ietaupīt laiku neskaitāmos veidos. Varat izveidot makro, lai automatizētu gandrīz jebkuru darbību, un Visual Basic redaktorā varat pielāgot makro, iegult vienu makro otrā vai izveidot apakšprogrammu, kas izpilda vairākus makro vienu pēc cits.

Tā kā VBA ir pilnvērtīga programmēšanas valoda, apakšprogrammas varat iekļaut lielākās lietojumprogrammās ar mainīgajiem, cilpām, nosacījumiem un daudz ko citu. Un pēc tam, kad esat apguvis VBA pamatus programmā Word, varat izmantot daudz šo zināšanu, lai izveidotu makro programmā Microsoft Excel un Access.

Lai to paveiktu tālāk, vēlaties uzzināt vairāk par VBA konvencijām un Visual Basic redaktoru, piemēram, par to, kā sakārtot kodu un kā rīkoties ar kļūdām. Bet pat tad, ja vēlaties palikt pie tādām vienkāršām funkcijām kā šeit aprakstītās, varat uzlabot savu produktivitāti.

E-pasts
Iesācēja apmācība par VBA makro rakstīšanu programmā Excel (un kāpēc jums vajadzētu mācīties)

Ja regulāri lietojat programmu Excel, ir vērts uzzināt, kā izveidot VBA makro un piekļūt daudzām citām funkcijām un iespējām.

Saistītās tēmas
  • Produktivitāte
  • Microsoft Word
  • Microsoft Office 365
  • Microsoft Office 2016
  • Microsoft Office padomi
  • Microsoft Office 2019
  • Makro
Par autoru
Stīvens Bīls (Publicēti 6 raksti)

Stīvens Bīls ir ilggadējs tehnoloģiju rakstnieks, kurš dzīvo Sanfrancisko apgabalā. Viņš ir autors daudzām grāmatām par datorprogrammām izdevējdarbībā un grafiskajā dizainā, un ir bijušais Macworld ziņu un pārskatu redaktors. Pašlaik viņš vada populāru vietni Steampunk Explorer.

Vairāk no Stīvena Bīla

Abonējiet mūsu biļetenu

Pievienojieties mūsu informatīvajam izdevumam par tehniskiem padomiem, atsauksmēm, bezmaksas e-grāmatām un ekskluzīviem piedāvājumiem!

Vēl viens solis !!!

Lūdzu, apstipriniet savu e-pasta adresi e-pastā, kuru tikko nosūtījām.

.