A makrók használatának megkezdése a Wordben

Belefáradt az ismétlődő feladatok elvégzésébe a Microsoft Word programban? A programba temetett egy hatékony automatizálási eszköz, amely le tudja venni ezeket a munkákat a kezéből. Makrókról beszélünk, és bár a szolgáltatás a Microsoft Visual Basic for Applications (VBA) rendszerére támaszkodik, akkor is használhatja, ha a kódolás ötlete a heebie-jeebies-t adja.

Egy gombnyomással a Word rögzíti a műveleteit, és létrehoz egy makrót, amelyet tetszés szerint újra lejátszhat. Ha kalandos, könnyen módosíthatja a makrót az extra fokú automatizálás érdekében.

Itt mutatunk egy egyszerű, de hasznos példát: Hogyan lehet automatizálni a Word Find and Replace funkcióját.

A makró rögzítése

Ebben a példában Ön az Antik Fogászati Eszközök Megőrzési Társaságának tisztelt elnöke. Több tucat Word dokumentumod van a történelmi fogsorokról és hasonlókról, mindezt a társadalom nevével. Aztán hirtelen a testület megszavazza a név megváltoztatását a Fogászati Antikvárosi Ligára. Most szüksége van egy egyszerű módszerre a dokumentumok frissítéséhez.

Kezdheti egy új üres dokumentummal, vagy megnyithat egy meglévőt. Ha még nem tette meg, akkor engedélyeznie kell a Fejlesztő lapot.

Menj Fájl> Beállítások> Szalag testreszabása . Jobb oldalon, alul Fő lapok , ellenőrizd a Fejlesztő választási lehetőség. Válassza az OK lehetőséget, és lépjen ki.

stop kód hibás hardver sérült oldal

Most hozzuk létre a makrót.

Kattintson Fejlesztő> Makró rögzítése .
A rendszer felkéri a makró elnevezésére. Írja be a ChangeSocietyName vagy bármely más, Önnek megfelelő nevet. A makrók elnevezésekor kerülje a szóközöket, pontokat, felkiáltójeleket és speciális karaktereket, különben hibaüzenetet kap. Használhat számokat, de az első karakternek betűnek kell lennie.
A makrót hozzárendelheti egy gombhoz és/vagy billentyűparancshoz, de ez nem követelmény. Ha a Gomb lehetőséget választja, a Word lehetővé teszi, hogy hozzáadja a Gyorselérési eszköztárhoz. A makró rövid leírását is hozzáadhatja.
Kattintson rendben , és a Word most rögzíti a műveleteit. Találat Ctrl + H hogy felhozza a Keresse meg és cserélje ki párbeszéd.
Lépjen be az Antik Fogászati Eszközök Megőrzési Társaságába a Find -ban és a Dental Antique Preservation League -ben cserélje ki.
Kattintson Cserélje ki az összeset a Find and Replace művelet végrehajtásához. Ez az egyetlen művelet, amelyet rögzíteni szeretne. Nem számít, hogy a makró valóban helyettesít -e bármilyen szöveget. A lényeg, hogy mentse el más dokumentumokhoz.
Ez fontos: Kattintson Fejlesztő> Felvétel leállítása . Ellenkező esetben a makró tartalmazza az összes későbbi műveletet.

Most lássuk a keze munkáját. Nyisson meg egy dokumentumot, amely tartalmazza a társaság nevét. Kattintson Fejlesztő> Makrók . Ha duplán kattint a ChangeSocietyName elemre, a Word automatikusan elvégzi a Find and Replace műveletet.

Tipp: A makró rögzítésekor előfordulhat, hogy olyan műveletet kell végrehajtania, amelyet nem szeretne rögzíteni. Érdemes például másolni és beilleszteni a szöveget a Keresés és csere párbeszédablakba, ahelyett, hogy kézzel gépelné. Semmi gond: Csak kattints Fejlesztő> Felvétel szüneteltetése , másolja és illessze be a szöveget, majd kattintson a gombra Fejlesztő> Rögzítő folytatása . Ezután befejezheti a makró rögzítését a fent leírtak szerint.

Bár itt a Microsoft Wordre összpontosítottunk, Ön is makrók használatával növelheti az Excel termelékenységét . És sok időtakarékos makró létezik a Microsoft OneNote számára.

Búvárkodás a kódexbe

Most mélyebbre merülünk az új Word makróban. Menj Fejlesztő> Makrók , de ahelyett, hogy duplán kattintana a makróra, válassza ki és kattintson Szerkesztés . Ezzel megnyílik a Visual Basic szerkesztő, amely önálló környezet a VBA-alkalmazások létrehozásához.

Félelmetesnek tűnhet, de figyelmen kívül hagyhatja a menüket és a legtöbb panelt. Fókuszáljon inkább a kódot tartalmazó ablakra. Amint láthatja, a Word most írt egy makrót, amely végrehajtja a Keresés és csere funkciót.

  
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

Magyarázzuk el, mi folyik itt.

Az első sor alja a szubrutin rövidítése, egy kis program, amely önmagában vagy egy nagyobb VBA alkalmazás részeként futtatható. Az idézőjelek előtti sorok a megjegyzéseket szolgálják. Az idézőjelek azt mondják a VBA -nak, hogy figyelmen kívül hagyja az ezeken a sorokon található állításokat.

jobb egérgombbal kattintson az érintőpad Windows 10 -re

Ezután eljutunk a kód húsához: a kódot, amely végrehajtja a Keresse meg és cserélje ki művelet. Amint láthatja, a Keresés és csere párbeszédpanel minden beállításához értékeket ad meg, beleértve a szöveget és a helyettesítő szöveget idézőjelben. Az Kiválasztás. Keresse meg. Végezze el parancs a vége közelében megegyezik az Összes cseréje gombra kattintással.

A makró módosítása

A makrók használatához nem kell bajlódnia a kóddal, sőt meg sem kell néznie. De többet kihozhat ebből a funkcióból, ha hajlandó belemerülni. Tegyük fel például, hogy hibát ír el a makró rögzítésekor. Ahelyett, hogy újra rögzítené, menjen a Visual Basic programba, és javítsa ki.

A makrót is módosíthatja, hogy hasznosabb legyen, és ezt fogjuk itt tenni. A Keresés és csere futtatásakor, akár manuálisan, akár makrón keresztül, a Word megjegyzi a keresés és csere szövegét. Amikor legközelebb megnyitja a Keresés és csere párbeszédpanelt, ez így fog kinézni.

Jobb lenne törölni az értékeket, hogy tiszta párbeszédpanelt kapjunk. Ezt egy második makróval fogjuk megtenni, ezúttal kivéve közvetlenül a Visual Basicben.

A Visual Basic szerkesztőben válassza ki a teljes alprogramot, az első sortól az Alfejezet végéig. Találat Ctrl + C hogy lemásolja.
Helyezze a kurzort az End Sub alá, és nyomja meg Ctrl + V . Most sokszorosította az alprogramot.
Változtassa meg a nevet ChangeSocietyName -ról ClearFindReplace -re (vagy bármely más, Önnek megfelelő névre). Ez azért fontos, mert a VBA hibaüzenetet generál, ha ismétlődő nevű makrókat próbál futtatni.
Ban,-ben .Szöveg és Replacement.Text értékeket, távolítsa el a szöveget, de hagyja az idézőjeleket. Lényegében azt mondod a Wordnek, hogy ne találjon semmit, és cserélje le semmivel, de tisztázza ezeket az értékeket is.

Az eredménynek így kell kinéznie:

  
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

Most térjünk vissza a ChangeSocietyName makróhoz. A Find and Replace kód alatt, de az End Sub előtt írja be a ClearFindReplace parancsot (zárójel nélkül a végén).

Így van: Nem kell megadnia az összes létrehozott kódot, csak a makró nevét.

  
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

Amikor a Word futtatja a ChangeSocietyName alkalmazást, először az eredeti Find and Replace funkciót hajtja végre. Ezután a ClearFindReplace parancsot fogja értelmezni a második makró futtatásához.

Továbblépés a VBA -val

Amint láthatja, a Word makró rögzítési funkciója számtalan módon segíthet időt megtakarítani. Létrehozhat makrókat szinte minden művelet automatizálására, a Visual Basic szerkesztőben pedig módosíthatja a makrókat, beágyazhat egy makrót a másikba, vagy létrehozhat egy alprogramot, amely több makrót hajt végre egymás után.

Mivel a VBA teljes értékű programozási nyelv, az alprogramokat beépítheti nagyobb alkalmazásokba változókkal, ciklusokkal, feltételes utasításokkal és egyebekkel. És miután megtanulta a VBA alapjait a Wordben, ugyanezen ismeretek nagy részét alkalmazhatja makrók létrehozásához a Microsoft Excel és Access programban.

hogyan lehet javítani a mikrofont a Windows 10 rendszeren

Ha tovább akarja vinni, többet szeretne megtudni a VBA -konvenciókról és a Visual Basic szerkesztőről, például a kód rendszerezéséről és a hibák kezeléséről. De még akkor is, ha ragaszkodni szeretne az olyan egyszerű funkciókhoz, mint az itt leírtak, sokat tehet a termelékenység javítása felé.

Részvény Részvény Csipog Email Kezdő oktatóanyag a VBA makrók írásáról Excelben (és miért érdemes tanulni)

Ha rendszeresen használja az Excel programot, érdemes megtanulnia, hogyan kell VBA -makrókat létrehozni, és még sok más funkcióhoz és képességhez hozzájutni.

Olvassa tovább Kapcsolódó témák

Termelékenység
Microsoft Word
Microsoft Office 365
Microsoft Office 2016
Microsoft Office tippek
Microsoft Office 2019
Makrók

A szerzőről Stephen Beale(6 cikk megjelent)

Stephen Beale régóta technológiai író, San Francisco környékén. Számos könyvet írt a kiadói és grafikai tervezési számítógépes alkalmazásokról, a Macworld korábbi hírek és kritikák szerkesztője. Jelenleg a The Steampunk Explorer nevű, a steampunk rajongók számára népszerű webhelyet vezeti.

Továbbiak Stephen Beale -től

Iratkozzon fel hírlevelünkre

Csatlakozz hírlevelünkhöz, ahol technikai tippeket, véleményeket, ingyenes e -könyveket és exkluzív ajánlatokat találsz!

Feliratkozáshoz kattintson ide