Kuidas alustada Wordis makrosid

Kas olete väsinud Microsoft Wordis korduvate ülesannete täitmisest? Programmi sisse maetud on võimas automatiseerimistööriist, mis võib need tööd käest ära võtta. Me räägime makrodest ja kuigi see funktsioon tugineb Microsofti Visual Basic for Applications (VBA) rakendusele, saate seda kasutada isegi siis, kui kodeerimise idee annab teile häbememokad.

Nupule klõpsates salvestab Word teie toimingud, luues makro, mida saate uuesti esitada nii sageli kui soovite. Kui olete seiklushimuline, saate makro täiendava automatiseerimise jaoks hõlpsalt muuta.

Siin näitame teile ühte lihtsat, kuid kasulikku näidet: Kuidas automatiseerida Wordi funktsiooni Otsing ja asendamine.

Makro salvestamine

Selles näites olete vanade hambaraviseadmete säilitamise ühingu lugupeetud president. Teil on kümneid Wordi dokumente ajalooliste proteeside jms kohta, kõik koos ühiskonna nimega. Siis äkki hääletab juhatus nime muutmise vastu Dental Antiques Preservation League'iks. Nüüd vajate lihtsat viisi dokumentide värskendamiseks.

Võite alustada uue tühja dokumendiga või avada olemasoleva. Kui te pole seda veel teinud, peate lubama vahekaardi Arendaja.

Minema Fail> Valikud> Kohanda linti . Paremal, all Peamised vahelehed , kontrolli Arendaja valik. Valige OK ja väljuge.

windows 10 bsod süsteemi lõime erandit ei käsitleta

Nüüd loome oma makro.

Klõpsake nuppu Arendaja> Salvesta makro .
Teil palutakse makro nimetada. Sisestage ChangeSocietyName või mõni muu teile sobiv nimi. Makrode nimetamisel vältige tühikuid, punkte, hüüumärke ja erimärke, muidu saate veateate. Võite kasutada numbreid, kuid esimene märk peab olema täht.
Makro saate määrata nupule ja/või klaviatuuri otseteele, kuid see pole nõue. Kui valite nupu, lubab Word selle lisada kiire juurdepääsu tööriistaribale. Samuti saate lisada makro lühikirjelduse.
Klõpsake nuppu Okei ja Word salvestab nüüd teie toimingud. Tabas Ctrl + H üles tuua Leidke ja asendage dialoogi.
Sisestage vanade hambaraviseadmete säilitamise ühing Find ja Dental Antique Preservation League asendusse.
Klõpsake nuppu Asenda kõik otsingu ja asendamise toimingu sooritamiseks. See on ainus toiming, mida soovite salvestada. Pole tähtis, kas makro asendab tegelikult teksti. Mõte on salvestada see muude dokumentide jaoks.
See on oluline: klõpsake Arendaja> Lõpeta salvestamine . Vastasel juhul hõlmab makro kõiki järgnevaid toiminguid.

Vaatame nüüd teie kätetööd. Avage dokument, mis sisaldab seltsi nime. Klõpsake nuppu Arendaja> Makrod . Kui topeltklõpsate suvandil ChangeSocietyName, teeb Word automaatselt toimingu Find and Replace.

Näpunäide: Makro salvestamisel peate võib -olla tegema toimingu, mida te ei soovi salvestada. Näiteks võite teksti käsitsi tippimise asemel kopeerida ja kleepida dialoogi Otsi ja asenda. Pole probleemi: klõpsake lihtsalt Arendaja> Peata salvestamine , kopeerige ja kleepige tekst, seejärel klõpsake Arendaja> Jätka salvestajat . Seejärel saate makro salvestamise lõpule viia, nagu eespool kirjeldatud.

Kuigi keskendusime siin Microsoft Wordile, saate ka seda teha kasutage Excelis tootlikkuse suurendamiseks makrosid . Ja Microsoft OneNote jaoks on palju ajasäästlikke makrosid.

Sukeldumine koodi

Nüüd sukeldume sügavamalt oma uude Wordi makrosse. Minema Arendaja> Makrod , kuid selle asemel, et topeltklõpsata makrot, valige see ja klõpsake Muuda . See avab Visual Basic redaktori, iseseisva keskkonna VBA-rakenduste loomiseks.

See võib tunduda hirmutav, kuid võite menüüsid ja enamikku paneele ignoreerida. Keskenduge selle asemel aknale, mis sisaldab koodi. Nagu näete, kirjutas Word just makro, mis teostab otsimise ja asendamise.

  
Sub ChangeSocietyName()  
'  
' ChangeSocietyName Macro  
' Rename Society for the Preservation of Antique Dental Appliances  
'  
 Selection.Find.ClearFormatting  
 Selection.Find.Replacement.ClearFormatting  
 With Selection.Find  
 .Text = 'Society for the Preservation of Antique Dental Appliances'  
 .Replacement.Text = 'Dental Antiques Preservation League'  
 .Forward = True  
 .Wrap = wdFindContinue  
 .Format = False  
 .MatchCase = False  
 .MatchWholeWord = False  
 .MatchWildcards = False  
 .MatchSoundsLike = False  
 .MatchAllWordForms = False  
 End With  
 Selection.Find.Execute Replace:=wdReplaceAll  
End Sub

Selgitame, mis siin toimub.

Esimese rea alamosa on lühend alamprogrammist, väikesest programmist, mida saab käivitada iseseisvalt või suurema VBA rakenduse osana. Rida, millele eelnevad jutumärgid, on kommentaaride jaoks. Jutumärgid käsivad VBA -l ignoreerida nende ridade avaldusi.

kuidas leida koeri müügiks

Siis jõuame koodi liha juurde: kood, mis täidab Leidke ja asendage operatsiooni. Nagu näete, määrab see iga dialoogi Otsing ja asendamine suvandi väärtused, sealhulgas jutumärkides oleva teksti ja asendusteksti. The Valik. Leia. Täida lõpus olev käsk võrdub nupu Asenda kõik klõpsamisega.

Makro modifitseerimine

Makrode kasutamiseks ei pea te koodi segama ega isegi seda vaatama. Kuid kui soovite sukelduda, saate sellest funktsioonist rohkem kasu. Oletame näiteks, et tegite makro salvestamisel kirjavea. Selle uuesti salvestamise asemel võite minna Visual Basicusse ja seda parandada.

Makro saab ka kasulikumaks muuta ja seda me siin teeme. Otsingu ja asendamise käivitamisel, kas käsitsi või makro kaudu, mäletab Word leitud ja asendatud teksti. Järgmine kord, kui avate dialoogi Otsi ja asenda, näeb see välja selline.

Parem oleks väärtused kustutada, et saaksime puhta dialoogiboksi. Teeme seda teise makroga, välja arvatud seekord, teeme seda otse Visual Basicus.

Valige Visual Basicu redaktoris kogu alamprogramm, alates esimesest reast kuni lõpu alameni. Tabas Ctrl + C seda kopeerida.
Asetage kursor End Sub all ja vajutage Ctrl + V . Olete just alamprogrammi dubleerinud.
Muutke nimi ChangeSocietyName asemel ClearFindReplace (või mõni muu teile sobiv nimi). See on oluline, kuna VBA genereerib veateate, kui proovite käivitada dubleerivate nimedega makrosid.
Aastal .Tekst ja Asendamine. Tekst väärtused, eemaldage tekst, kuid jätke jutumärgid. Põhimõtteliselt ütlete Wordile, et see ei leia midagi ja asendab selle mitte millegagi, kuid kustutate ka need väärtused.

Tulemus peaks välja nägema selline:

  
Sub ClearFindReplace()  
'  
' ClearFindReplace Macro  
' Clear Text from Find and Replace dialog  
'  
 Selection.Find.ClearFormatting  
 Selection.Find.Replacement.ClearFormatting  
 With Selection.Find  
 .Text = ''  
 .Replacement.Text = ''  
 .Forward = True  
 .Wrap = wdFindContinue  
 .Format = False  
 .MatchCase = False  
 .MatchWholeWord = False  
 .MatchWildcards = False  
 .MatchSoundsLike = False  
 .MatchAllWordForms = False  
 End With  
 Selection.Find.Execute Replace:=wdReplaceAll  
End Sub

Nüüd läheme tagasi ChangeSocietyName makro juurde. Sisestage koodi Otsi ja asenda alla, kuid enne lõpuosa Sub, sisestage ClearFindReplace (ilma sulgudeta lõpus).

See on õige: te ei pea sisestama kogu äsja loodud koodi, vaid ainult makro nime.

  
Sub ChangeSocietyName()  
'  
' ChangeSocietyName Macro  
' Rename Society for the Preservation of Antique Dental Appliances  
'  
 Selection.Find.ClearFormatting  
 Selection.Find.Replacement.ClearFormatting  
 With Selection.Find  
 .Text = 'Society for the Preservation of Antique Dental Appliances'  
 .Replacement.Text = 'Dental Antiques Preservation League'  
 .Forward = True  
 .Wrap = wdFindContinue  
 .Format = False  
 .MatchCase = False  
 .MatchWholeWord = False  
 .MatchWildcards = False  
 .MatchSoundsLike = False  
 .MatchAllWordForms = False  
 End With  
 Selection.Find.Execute Replace:=wdReplaceAll  
 ClearFindReplace  
 End Sub

Kui Word käivitab ChangeSocietyName, käivitab see kõigepealt algse funktsiooni Find and Replace. Seejärel tõlgendab see ClearFindReplace käsku teise makro käivitamiseks.

VBA -ga kaugemale minek

Nagu näete, aitab Wordi makro salvestamise funktsioon säästa aega lugematul viisil. Makroid saate luua peaaegu kõigi toimingute automatiseerimiseks ja Visual Basicu redaktoris saate makroid näpistada, ühe makro teise sisse manustada või luua alamprogrammi, mis täidab mitu makro üksteise järel.

Kuna VBA on täisväärtuslik programmeerimiskeel, saate alamprogramme kaasata suurematesse rakendustesse muutujate, silmuste, tingimuslausete ja muu abil. Ja kui olete õppinud Wordis VBA põhitõdesid, saate paljusid samu teadmisi rakendada makrode loomiseks Microsoft Excelis ja Accessis.

kuidas õunapoega rakendust teha

Et seda edasi arendada, soovite rohkem teada saada VBA tavade ja Visual Basic redaktori kohta, näiteks kuidas koodi korraldada ja vigadega tegeleda. Kuid isegi kui soovite jääda lihtsate funktsioonide juurde, nagu siin kirjeldatud, saate oma tootlikkuse parandamiseks palju edasi minna.

Jaga Jaga Piiksuma E -post Algaja õpetus VBA -makrode kirjutamiseks Excelis (ja miks peaksite õppima)

Kui kasutate Excelit regulaarselt, tasub õppida VBA -makrode loomist ning juurdepääsu veel paljudele funktsioonidele ja võimalustele.

Loe edasi Seotud teemad

Tootlikkus
Microsoft Word
Microsoft Office 365
Microsoft Office 2016
Microsoft Office'i näpunäited
Microsoft Office 2019
Makrod

Autori kohta Stephen Beale(6 artiklit avaldatud)

Stephen Beale on kauaaegne tehnoloogiakirjanik, kes asub San Francisco piirkonnas. Ta on kirjutanud arvukalt raamatuid kirjastamise ja graafilise disaini arvutirakenduste kohta ning on Macworldi endine uudiste ja arvustuste toimetaja. Praegu juhib ta Steampunk Explorerit, mis on populaarne veebisait Steampunk -entusiastidele.

Veel Stephen Beale'ilt

Telli meie uudiskiri

Liituge meie uudiskirjaga, et saada tehnilisi näpunäiteid, ülevaateid, tasuta e -raamatuid ja eksklusiivseid pakkumisi!

Tellimiseks klõpsake siin