Excel pievienojumprogramma var būt patiešām noderīga, ja makro bieži jāpalaiž dažādās darbgrāmatās.
Piemēram, pieņemsim, ka vēlaties izcelt visas šūnas, kurās ir kļūda, varat viegli izveidot Excel pievienojumprogrammu, kas ar vienu klikšķi izceļ kļūdas.
Kaut kas, kā parādīts zemāk (makro ir pievienots ātrās piekļuves rīkjoslai, lai to palaistu ar vienu klikšķi):
Līdzīgi, iespējams, vēlēsities izveidot pielāgotu Excel funkciju un izmantot to visās Excel darbgrāmatās, nevis atkal un atkal kopēt koda ielīmēšanu.
Ja jūs interesē vienkāršs VBA apguves veids, apskatiet manu Tiešsaistes Excel VBA apmācība.
Excel pievienojumprogrammas izveide
Šajā apmācībā jūs uzzināsit, kā izveidot Excel pievienojumprogrammu. Ir trīs darbības, lai izveidotu pievienojumprogrammu un padarītu to pieejamu QAT.
- Ierakstiet/ierakstiet kodu modulī.
- Saglabāt kā Excel pievienojumprogrammu.
- Pievienojiet makro ātrās piekļuves rīkjoslai.
Ierakstiet/ierakstiet kodu modulī
Šajā piemērā mēs izmantosim vienkāršu kodu, lai iezīmētu visas šūnas, kurām ir kļūdas vērtības:
Sub HighlightErrors () Selection.SpecialCells (xlCellTypeFormulas, xlErrors). Atlasiet Selection.Interior.Color = vbRed End Sub
Ja rakstāt kodu (vai kopējat vai ielīmējat to no kaut kur), veiciet tālāk norādītās darbības.
- Atveriet Excel darbgrāmatu.
- Nospiediet Alt + F11, lai atvērtu VB redaktora logu.
- VB redaktorā jūs redzētu darbgrāmatas objektus, kas uzskaitīti projektu pārlūkā. Ja to neredzat, dodieties uz Skatīt -> Projektu pētnieks.
- Ar peles labo pogu noklikšķiniet uz jebkura darbgrāmatas objekta. Dodieties uz opciju Ievietot un noklikšķiniet uz “Modulis”. Tas ievietos moduļa objektu.
- Veiciet dubultklikšķi uz moduļa un ievadiet iepriekš minēto kodu (kopējiet un ielīmējiet to).
- Nospiediet Alt+F11, lai atgrieztos Excel darblapā.
Piezīme: Ja ierakstāt makro, programma Excel automātiski parūpējas no ievietojiet moduli un ievietojiet tajā kodu.
Tagad turpināsim un izveidosim papildinājumu no šī koda.
Saglabājiet un instalējiet pievienojumprogrammu
Veicot tālāk norādītās darbības, atrodoties darbgrāmatā, kurā esat ievietojis kodu.
- Noklikšķiniet uz cilnes Fails.
- Noklikšķiniet uz “Saglabāt kā”.
- Dialoglodziņā Saglabāt kā nomainiet veidu “Saglabāt kā” uz .xlam. Failam piešķirtais nosaukums būs jūsu pievienojumprogrammas nosaukums. Šajā piemērā fails tiek saglabāts ar nosaukumu Izcelt kļūdas.
- Jūs pamanīsit, ka faila ceļš, kurā tas tiek saglabāts, automātiski mainās. Ja vēlaties, varat izmantot noklusējuma iestatījumu vai mainīt to.
- Jūs pamanīsit, ka faila ceļš, kurā tas tiek saglabāts, automātiski mainās. Ja vēlaties, varat izmantot noklusējuma iestatījumu vai mainīt to.
- Atveriet Excel darbgrāmatu un dodieties uz Izstrādātājs -> Papildinājumi -> Excel pievienojumprogrammas.
- Dialoglodziņā Papildinājumi pārlūkojiet un atrodiet saglabāto failu un noklikšķiniet uz Labi.
Tagad pievienojumprogramma ir aktivizēta.
Jūs, iespējams, neredzēsit nevienu cilni vai opciju lentē, taču pievienojumprogramma tiek aktivizēta šajā posmā, un kods ir pieejams lietošanai tagad.
Nākamais solis ir pievienot makro ātrās piekļuves rīkjoslai, lai makro varētu palaist ar vienu klikšķi.
Piezīme: Ja veidojat pievienojumprogrammu, kurai ir pielāgota funkcija, jums nav jāiet uz 3. darbību. Līdz 2. darbības beigām šī funkcija būs pieejama visā darbgrāmatā. 3. darbība ir paredzēta šādiem kodiem, kur vēlaties, lai, palaižot kodu, notiktu kaut kas (piemēram, izceltu šūnas ar kļūdām).
Saglabājiet un instalējiet pievienojumprogrammu
Lai to izdarītu:
- Ar peles labo pogu noklikšķiniet uz jebkuras lentes cilnes un atlasiet Pielāgot ātrās piekļuves rīkjoslu.
- Dialoglodziņā Excel opcijas nolaižamajā izvēlnē Izvēlieties komandas atlasiet makro. Jūs pamanīsit, ka tur ir norādīts makro “HighlightErrors”.
- Noklikšķiniet uz makro “HighlightErrors” un noklikšķiniet uz Pievienot. Tas pievienos makro labajā pusē esošajam sarakstam.
- Noklikšķiniet uz Labi. Tas makro pievienos ātrās piekļuves rīkjoslai.
Lai palaistu šo kodu jebkurā darbgrāmatā, atlasiet datu kopu un QAT noklikšķiniet uz makro ikonas.
Tas iezīmēs visas šūnas ar kļūdām sarkanā krāsā. Šo makro varat izmantot arī jebkurā darbgrāmatā, jo esat iespējojis pievienojumprogrammu.
Uzmanību!: Makro veiktās izmaiņas nevar atsaukt, izmantojot taustiņu kombināciju Control + Z.
Varat arī izveidot pielāgotas funkcijas un pēc tam saglabāt to kā Excel pievienojumprogrammu. Tagad, iespējojot pievienojumprogrammu, pielāgotās funkcijas būtu pieejamas visās jūsu Excel darbgrāmatās.
