Lai gan makro palaišana programmā Excel nav grūta, ir daudz veidu, kā tos palaist. Daži veidi ir paredzēti, lai atvieglotu makro izmantošanu, bet citi veidi var pilnībā mainīt veidu, kā lietotājs mijiedarbojas ar jūsu darbgrāmatu. Šajā rakstā mēs apskatīsim dažus acīmredzamus makro palaišanas veidus, piemēram, makro sarakstu un pogu vadīklas, un dažus neskaidrus veidus, piemēram, VB redaktoru un notikumus.
Pirmkārt: pārliecinieties, vai makro ir iespējots
Excel drošības līdzekļi pēc noklusējuma atspējos makro. Atverot darbgrāmatu ar makro, lietotājiem parasti tiek prasīts, vai viņi vēlas iespējot makro.
Ja nevarat palaist makro, mēģiniet izpildīt šos norādījumus:
- Saglabājiet darbgrāmatu
- Aizveriet darbgrāmatu un pēc tam atveriet to vēlreiz
- Kad darbgrāmata tiek ielādēta, jūs redzēsit a Drošības brīdinājums uzvedne (attēlā zemāk). Klikšķis Iespējot saturu.
Palaidiet makro no makro saraksta
Makro sarakstam var piekļūt cilnē Skats. Lai apskatītu šo sarakstu:
- Izvēlieties Skatīt cilni
- Noklikšķiniet uz pogas ar apzīmējumu Makro lai atvērtu makro sarakstu
- Sarakstā atlasiet makro, kuru vēlaties palaist, un pēc tam noklikšķiniet uz Skrien pogu
Makro sarakstu var parādīt arī jebkurā laikā, nospiežot ALT+F8.
Palaidiet makro, izmantojot īsinājumtaustiņu
Makro, kuru izmantojat bieži, varat piešķirt īsinājumtaustiņu, izmantojot CTRL+vai CTRL+SHIFT+. Lai to izdarītu:
- Atveriet makro sarakstu (Skatīt > Makrovai ALT+F8)
- Atlasiet makro, kuram vēlaties lietot saīsni
- Klikšķis Iespējas… lai parādītu Makro opcijas apakšdialogs
- Tekstlodziņā zem Īsinājumtaustiņš, ierakstiet vienu burtu un pēc tam noklikšķiniet labi. Ja, rakstot burtu, turiet nospiestu taustiņu SHIFT, etiķete blakus lodziņam īsinājumtaustiņā parādīs SHIFT
PIEZĪME: ir ļoti ieteicams izmantot SHIFT, veidojot īsinājumtaustiņu! Excel sev izmanto CTRL+ īsceļus, piem. CTRL+C, lai kopētu, vai CTRL+V, lai saglabātu. Ja izveidojat makro saīsni, izmantojot šos vai citus Excel saīsnes, jūs pārrakstīsit Excel saīsni, līdz atkārtoti piešķirsit makro saīsni.
Palaidiet makro no VB redaktora
Makro var palaist arī no VB redaktora. VB redaktors ļauj pārskatīt makro kodu un veikt nepieciešamās izmaiņas pirms tā palaišanas.
Lai palaistu makro VB redaktorā:
- Atveriet VB redaktoru (cilne Izstrādātājs> Visual Basic vai ALT+F11)
- Iekš Projekts logā veiciet dubultklikšķi uz moduļa, kurā ir pārbaudāms makro
- Moduļa koda logā novietojiet kursoru jebkurā makro koda vietā starp “Sub” un “End Sub”
- Noklikšķiniet uz Skrien pogu rīkjoslā vai nospiediet īsinājumtaustiņu F5
Palaidiet makro, izmantojot pogu vai formu
Bieži vien ir noderīgi, ja darblapā ir vadīkla, uz kuras lietotājs var noklikšķināt, lai palaistu makro, piemēram, pogas vadīkla vai forma. Gala lietotājiem tas ir daudz ātrāk nekā makro sarakstu atvēršana vai makro koda meklēšana VB redaktorā.
Informāciju par klikšķināmas pogas vai formas izveidi var atrast šeit: Pievienojiet pogu un piešķiriet makro programmā Excel.
Automātiski palaist makro, izmantojot notikumus VBA
Makro var palaist, ja programmā Excel kaut kas notiek - piemēram, atverot darbgrāmatu vai mainot šūnas vērtību. Šos sauc Notikumi, un jūs varat uzrakstīt VBA kodu, lai viņi izsauktu makro vai veiktu citas darbības.
Lai rakstītu notikuma kodu, jums jāizmanto VB redaktors. Piemēram, lai apskatītu darbgrāmatas notikumus:
- Atveriet VB redaktoru (ALT+F11)
- Veiciet dubultklikšķi uz Šī darba grāmata objekts VB redaktorā Projekta logs
- Koda loga augšējā kreisajā stūrī esošajā nolaižamajā izvēlnē izvēlieties “Darbgrāmata”
- Noklikšķiniet uz nolaižamās izvēlnes labajā pusē, lai redzētu notikumu sarakstu
Tālāk ir sniegts neliels, bet noderīgs Excel notikumu paraugs, no kura varētu palaist makro.
Workbook_Open ()
Notikums Workbook_Open () tiek aktivizēts, atverot darbgrāmatu. Ja pēc darbgrāmatas atvēršanas tiek parādīts brīdinājums par drošību, šis notikums tiek aktivizēts pēc noklikšķināšanas uz “Iespējot saturu”.
| 12345 | Privāta apakšdarbgrāmata_atvērt ()MsgBox "Atvērta darbgrāmata!"Beigu apakš |
Workbook_BeforeClose (Atcelt kā Būla)
Darbgrāmata_BeforeClose () tiek aktivizēta, kad lietotājs mēģina aizvērt darbgrāmatu. Tas notiek pirms jebkādu pārbaužu veikšanas, lai noskaidrotu, vai darbgrāmata ir jāsaglabā.
The Atcelt parametru var iestatīt uz True, lai apturētu darbgrāmatas aizvēršanos.
| 123456789 | Privāta apakšdarbgrāmata_BeforeClose (Atcelt kā Būla)Ja MsgBox ("Vai esat pārliecināts?", VbYesNo + vbQuestion, "Close") = vbNē TadAtcelt = taisnībaBeigas JaBeigu apakš |
Worksheet_Change (ByVal Target kā diapazons)
Worksheet_Change () tiek aktivizēts, mainot šūnas vērtību - neatkarīgi no tā, vai to maina makro, kopēšanas/ielīmēšanas darbība vai ārēja saite. Tomēr tas netiek aktivizēts, ja vērtība tiek pārrēķināta, izmantojot formulu.
The Mērķis parametrs attēlo šūnas, kuru vērtība ir mainījusies.
Ja mainīsit citu šūnu vērtību šajā notikumā, notikums tiks aktivizēts vēlreiz. Tas, iespējams, var izraisīt bezgalīgu cilpu. Ja jums ir jāmaina šūnu vērtības, neaktivizējot šo notikumu, apsveriet iestatījumu Application.EnableEvents uz Nepatiess vispirms un pēc tam iestatiet to atpakaļ uz Taisnība pasākuma procedūras beigās.
| 123456789 | Privāta apakšdarblapas maiņa (ByVal mērķis kā diapazons)MsgBox "Šūnas mainītas:" & Target.AddressApplication.EnableEvents = NepareiziDiapazons ("A2"). Vērtība = Diapazons ("A2"). Vērtība + Target.Cells.CountApplication.EnableEvents = PatiessBeigu apakš |
Worksheet_SelectionChange (ByVal mērķis kā diapazons)
Šis notikums tiek aktivizēts ikreiz, kad ar mērķauditorijas atlasi tiek atlasītas dažādas šūnas. Parametrs Mērķis attēlo jaunās atlasītās šūnas.
Šo notikumu var aktivizēt arī ar kodu, t.i., “Diapazons (“ A1 ”). Izvēlieties”. Tāpat kā ar Worksheet_Change (), jums vajadzētu būt uzmanīgiem, atlasot citas šūnas šajā notikumā, jo jūs varat izraisīt bezgalīgu cilpu. Izmantojiet lietojumprogrammu Application.EnableEvents.
| 123456789 | Privāta apakšdarblapa_SelectionChange (pēc mērķa kā diapazons)Ja Target.Address = "$ A $ 1" TadMsgBox "Kursors sākuma stāvoklī."Beigas JaBeigu apakš |
Pārtrauciet darboties makro
Darbīgu makro var pārtraukt, nospiežot ESC vai CTRL+BREAK. Pēc noklusējuma pārtraukts makro parādīs šādu dialoglodziņu:
Noklikšķinot Beigas apturēs makro, kamēr Turpināt to atsāks. Noklikšķinot Atkļūdot atvērs makro VB redaktorā un fokusēs koda rindu, uz kuras izpilde tika apturēta. (VB redaktorā varat apturēt vai atsākt makro, izmantojot rīkjoslas pogas Palaist vai Beigt.)
Application.EnableCancelKey
Varat atspējot iespēju apturēt makro, izmantojot ESC vai CTRL+BREAK, iestatot Application.EnableCancelKey īpašums. Šim īpašumam ir trīs iespējamās vērtības:
- xlPārtraukums - šī ir noklusējuma vērtība, kas liek programmai Excel parādīt iepriekš redzamo dialoglodziņu
- xlAtspējots - noņem iespēju apturēt darbojošos makro
- xlErrorHandler - ja tiek veikts pārtraukuma mēģinājums, tiek izmesta kļūda, kuru var apstrādāt kodā
Ikreiz, kad koda izpilde tiek pārtraukta, Excel vienmēr atiestata lietojumprogrammas vērtību. EnableCancelKey atpakaļ uz xlPārtraukums.
Labs iemesls šī īpašuma izmantošanai ir drošība. Piemēram, ja jums būtu makro, kas uz laiku neaizsargātas jūsu darbgrāmatas daļas, lietotājs varētu apturēt makro tūlīt pēc neaizsargātības un piekļūt saturam, kuru viņiem neesat paredzējis. Iestatot Application.EnableCancelKey, jūs varat pilnībā atspējot viņu spēju to izdarīt vai graciozi apstrādāt to pārtraukšanu, izmantojot kļūdu apstrādātāju, kas atkārtoti aizsargā darbgrāmatu.
| 1234567891011 | Apakš UpdateBaseData (ByVal NewData kā diapazons, ByVal mērķis kā diapazons)Application.EnableCancelKey = xlDisabledTarget.Worksheet.Aizsargājiet "MyPassword"NewData.Copy TargetTarget.Worksheet.Protect "MyPassword"Application.EnableCancelKey = xlInterruptBeigu apakš |
Piespiedu kārtā aizveriet Excel, izmantojot Windows uzdevumu pārvaldnieku
Ja makro ir “nokarājies” vai programma Excel ir kļuvusi pārāk aizņemta, lai atzītu pārtraukuma mēģinājumu, iespējams, jums būs jāpiespiež Excel ar spēku, izmantojot Windows uzdevumu pārvaldnieks. (PIEZĪME. To darot, jūs varat zaudēt nesaglabātu darbu un paļauties uz darbgrāmatas automātiskās atkopšanas versiju.)
- Tieši atveriet uzdevumu pārvaldnieku, izmantojot CTRL+SHIFT+ESC
- Izvēlieties “Procesi”Cilni
- Izvērsiet vienumu “Microsoft Excel”, lai parādītu visas darbgrāmatas
- Atlasiet darbgrāmatu, kuru vēlaties aizvērt, un pēc tam noklikšķiniet Beigt uzdevumu apakšējā labajā stūrī
