„Vahetu aken” võib olla kasulik tööriist Excelis VBA -ga töötamisel.
Vahetu aken võimaldab teil kiiresti teha selliseid asju nagu:
- Saate teavet Exceli failide kohta (nt lehtede arv töövihikus või töövihiku nimi)
- Hankige silumine. Printige teave kiiresti
- Käivitage koodirida sekunditega
- Käivitage makro (või helistage funktsioon)
- Muutujate kohta teabe hankimine (või väärtuse või muutujate määramine)
Kuigi te ei pea Excelis VBA -ga töötamiseks vahetu akent kasutama, võib selle hea kasutamise teadmine muuta teid palju tõhusamaks.
Selles õpetuses käsitlen kõike, mida peate teadma vahetu akna kohta ja kuidas seda kõige paremini kasutada (selgitatud näidetega).
Alustame!
Mis on Excel VBA vahetu aken?
Kohene aken on osa VB redaktorist, mida saate kasutada kiirete asjade tegemiseks.
Kui näitena tuua, kui teil on mõne peidetud töölehega töövihik ja soovite kiiresti teada saada töölehtede koguarvu, saate seda teha mõne sekundi jooksul aknaga Kohe.
Kohene aken teeb palju rohkem (nagu näete selles õpetuses hiljem). Alustuseks mõelgem aga kohe aknale kui vahendile, mis aitab teil Excel VBA -s tööd kiirendada.
Kust otsest akent leida?
Kui avate Exceli VB-redaktori, näete vahetu akent juba VB-redaktori osana. Ja kui te seda juba ei näe, saate selle hõlpsalt kuvada.
Allpool on toodud sammud VB redaktori avamiseks ja vahetu akna nähtavaks tegemiseks.
- Klõpsake Exceli lindil vahekaarti „Arendaja” (kui te ei näe arendaja vahekaarti, klõpsake siin, et seda hankida)
- Klõpsake koodirühmas „Visual Basic”. See avab VB redaktori
- Klõpsake VB redaktoris menüüvalikul „Vaade”
- Klõpsake vahetu akent. See kuvab vahetu akna VB redaktoris.
Kui teile meeldivad otseteed, on ülaltoodud toimingute kiirendamiseks mõned järgmised.
- VB redaktori avamiseks - ALT + F11 (see töötab isegi siis, kui lindil pole vahekaarti Arendaja)
- Vahetu akna kuvamiseks - Control + G (kasutage seda, VB redaktor on avatud)
Näited vahetu akna kasutamise kohta Excelis VBA
Nüüd, kui teate, kust otsest akent leida, vaatame mõningaid suurepäraseid näiteid, kuidas seda Excel VBA -ga töötades kasutada.
Hankige teavet failide/töövihikute kohta
Vahetu aken on koht, kus saate esitada töövihikute kohta küsimusi ja see annab teile kohe vastuse.
Oletame näiteks, et teil on töövihik ja soovite teada, kui palju lehti on töövihikus, võite tippaknasse sisestada alloleva koodi ja vajutada sisestusklahvi.
? ActiveWorkbook.Sheets.Count
See näitab koheselt aktiivse töövihiku lehtede koguarvu.
See võib olla kasulik, kui teil on töövihik, milles on palju lehti ja te ei saa seda käsitsi loendada (või ei taha), või kui teil on töövihik, kus on peidetud lehti ja soovite teada koguarvu loendama.
Kas? (küsimärki) tuleks kasutada enne päringut, et VBA saaks aru, et esitate küsimuse. Kui te seda küsimärki ei kasuta, ei anna vahetu aken teile üksikasju/vastust.Nüüd on see tõesti lihtne näide, kus vahetu aken annab teile teavet ja säästab aega.
Allpool on veel mõned näited:
Aktiivse töövihiku nime saamiseks
? ActiveWorkbook.Name
Aktiivse lehe nime saamiseks
? Tegevusleht. Nimi
Töövihiku tee (aadress, kuhu see on salvestatud) hankimiseks
? ActiveWorkbook.Path
Seega, kui vajate objekti kohta midagi (näiteks töövihikut, lehti, diagramme, kujundeid, vahemikku jne), saate selle teabe kiireks hankimiseks kasutada vahetu akent.
Hankige silumine. Prindi teave
Excel VBA -s kasutatakse Debug.Print, et kuvada muutuja väärtus koheselt vahetu aknas.
Näiteks näitab allolev kood kohe aknas sõnumit “Tere hommikust”.
Alam DisplayMessage () Silumine. Prindi "Tere hommikust" lõppalam
Saate kasutada koodi Debug.Print rida, et kiiresti andmeid aknasse hankida või koodi siluda.
Näiteks kui soovite saada töövihiku kõigi lehtede nimed, võite kasutada järgmist koodi:
Alam GetSheetNames () Iga aktiivse töövihiku sh -i jaoks. Lehtede silumine. Prindi sh.Name Järgmine sh Lõpeta alam
Ülaltoodud kood läbib aktiivse töövihiku iga lehe ja annab nime kohe aknas.
Silumine. Print on kasulik meetod teie koodi silumiseks. Näiteks kui kasutate tsüklit ja soovite näha, mitu korda tsükkel käivitati, võite lihtsalt paigutada silumisrežiimi. Prindi rida, mis näitab lihtsalt kasvavaid numbreid iga silmuse käivitamisel.
Kui kasutate Silumine. Print koodi silumiseks ärge unustage seda eemaldada, kui olete lõpetanud.
Makro (või funktsiooni) käivitamine
Kuigi Excelis saab makro käivitada mitmel viisil, on üks kiireid viise vahetu akna kasutamine.
Makro käitamiseks piisab, kui sisestada makro nimi vahetu aknasse ja vajutada sisestusklahvi (selle toimimiseks peaks kursor olema makro nime lõpus).
Allpool on näide, kus kohe, kui sisestate makro nime vahetu aknasse, käivitab see koodi (kus kood kuvab vaheaknas sõnumi “Tere hommikust”).
See võib olla kasulik, kui teil on kood ja soovite kontrollida, kas see toimib ootuspäraselt või mitte. Teil võib olla üks või mitu silumist. Printige koodile read ja käivitage makro vahetu akna kaudu.
See näitab koheselt väärtusi vahetu aknas ja saate kontrollida, kas kõik töötab hästi või mitte.
Kohandatud funktsioonide täitmiseks saate kasutada ka vahetu akent.
Näiteks on allolevas näites loodud funktsioon, mis kontrollib, kas arv on paaris või paaritu. Saate selle funktsiooni käivitada vahetu akna kaudu, sisestades funktsiooni vajaliku argumendiga. Sel juhul peate kasutama küsimärki, kui palute sellel funktsioonis salvestatud väärtust tagastada.
Käivitage koodirida (või mitu koodirida)
Kohese aknaga saate käivitada ka koodirida (või mitu koodirida).
Parim osa sellest on see, et saate lihtsalt avada vahetu akna, käivitada koodi ja sulgeda (erinevalt makrost, mille peate mooduli aknasse sisestama ja seejärel täitma).
See võib olla kasulik juhul, kui soovite kiiresti kõik töövihiku lehed peita.
Allpool on kood, mille saate paigutada vahetusse aknasse, et kõik töövihiku lehed peita. Asetage kursor rea lõppu ja niipea, kui vajutate sisestusklahvi, avab see kõik lehed.
Selle töövihiku iga lehe kohta. Lehed: leht. Nähtav = Tõsi: järgmine leht
Pange tähele, et kuigi see näeb välja nagu üks koodirida, koosneb see kolmest osast.
Iga osa on eraldatud tähisega: (koolon), mis toimib nagu reavahe. See võimaldab kasutada vahetu akna lingina Järgmine iga lehe läbimiseks ja nähtava atribuudi muutmiseks väärtuseks TRUE (mis näitab peidetud lehti).
Hankige muutuvaid väärtusi
Kui alustate keerukate VBA -koodide loomist, peate töö tegemiseks tuginema muutujatele.
Muutuja on midagi, millel on väärtus ja see väärtus võib koodi töötamise ajal muutuda. Nende muutujate väärtuste kontrollimiseks saate kasutada vahetu akent.
Allpool on lihtne kood, mis annab esimese 10 positiivse täisarvu summa ja näitab tulemust kohe aknas.
Sub AddFirstTenNumbers () Dim Var täisarvuna Dim i täisarvuna Dim k täisarvuna i = 1 kuni 10 k = k + i Järgmine i silumine. Print i, k End Sub
Niipea kui käivitate selle koodi, näete vahetu aknas allolevat tulemust. See ütleb teile koheselt, et kood töötab hästi ja annab oodatud tulemuse.
Kui see ei anna oodatud tulemusi, saate koodi siluda.
Paljud inimesed kasutavad koodi silumisel sõnumikasti. Kuigi see töötab hästi, leian, et see on pisut pealetükkiv, kuna viib mind Exceli töövihikusse ja kuvab sõnumikasti. Teisest küljest on vahetu akna kasutamine silumiseks palju sujuvam ja hoiab mind Visual Basicu redaktoris endas.
Märkus. Kui töötate keerulise koodiga ja teil on mitu muutujat, mida peate jälgima, on parem kasutada vaatamisakent. Vaateaken võimaldab teil lisada muutuja ja siis näete, kuidas see muutuja reaalajas (või koodist läbi astudes) muutub.Silumisel määrake muutuja väärtus
See on vahetu akna veidi täiustatud kasutamine, kuid kui seda kasutate, võib see koodi silumisel olla tohutu aja kokkuhoid.
Vahetu akna abil saate määrata muutuja väärtuse, kui käivitate koodi silumisrežiimis (kus määrate katkestuspunkti, nii et kood ei täida täielikult, vaid kuni konkreetse rea).
Näiteks kui teil on silmus, mis töötab 10 korda ja soovite kontrollida, mis juhtub, kui tsükkel jookseb kaheksandat korda, ei pea te kaheksandate kordusteni jõudmiseks silmusest seitse korda läbi astuma. Saate lihtsalt lisada katkestuspunkti silmuse ette ja muuta silmuse muutuja väärtuseks 8. Nüüd, kui käivitate koodi, näitab see teile, mis juhtub, kui tsüklid käivad 8. korda.
See muutub palju kasulikumaks, kui kirjutate keerukaid koode ja soovite siluda konkreetseid ahelaid.
Oletame, et teil on kood, nagu allpool näidatud:
Sub UnhideSheets () i = 1 töölehtedele. Count silumine. Print Sheets (i). Nimi Järgmine i End Sub
Ülaltoodud kood loetleb vahetu aknas lihtsalt töövihiku kõigi lehtede lehtede nimed.
Kui te ei soovi loetleda kõigi lehtede nimesid, vaid ainult lehti pärast 10. lehte, võite paigutada silmuse teisele reale katkestuspunkti (nii et pärast seda rida ei täideta midagi) ja seejärel muuta muutuja "i" kuni 11.
Muutuja nime vahetamiseks vahetu aknas sisestage järgmine rida:
i = 11
See tagab, et silmuse esimest 10 korda ignoreeritakse ja teie muutuja väärtus on seatud 11 -le.
Kohese akna dokkimine/lahtipakkimine
Saate akna kohe dokkida VB redaktorisse - see tähendab, et see jääb VB redaktoris ühte kohta ja liigub koos selle suurusega.
Ja saate selle ka dokkimata jätta, mis tähendab, et see ei sõltu VB-redaktorist ja seda saab liigutada eraldiseisva aknana.
Allpool kirjeldatakse, kuidas saate vahetu akna dokkimisseadeid muuta.
- Klõpsake VB redaktori menüüs suvandit Tööriistad
- Klõpsake "Valikud"
- Klõpsake dialoogiboksis Suvandid viimast vahekaarti - dokkimine
- Märkige suvand Kohene aken, et see oleks dokkitav, ja eemaldage märkeruut, et see ei oleks dokkimisvõimeline.
- Klõpsake nuppu OK
Teise võimalusena, kui vahetu aken on nähtav, saate paremklõpsata ja muuta selle dokkimisomadusi.
Dokkimine tähendab, et vahetu aken muutuks olemasoleva akna osaks, asetades end teatud kohtadesse, näiteks akna vasakule või alla. See võimaldab dokitud akendel koos liikuda ja suurust suurendada.
Vahetut akent ei kuvata - siin on mõned viisid selle saamiseks
Sellel võib olla mitu põhjust.
Kõige tavalisem põhjus, miks te kohe akent ei näe, on see, et see pole nähtavaks muutunud. See ei pruugi vaikimisi olla nähtav ja selle kuvamiseks peate minema menüü suvandisse Vaade ja klõpsama suvandil Kohene aken. See tagab, et see on VB redaktoris nähtav.
Vahetu akna kuvamiseks võite kasutada ka klaviatuuri Control + G. Kasutage seda klaviatuuri otseteed, kui olete VB -redaktoris.
Teine põhjus, miks te kohe akent ei näe, on see, et see on minimeeritud, nii suletud, et te ei näe seda (nagu siin teatatud). Lihtsalt tehke kiire skannimine ja kontrollige, kas näete kuskil varjatud väikest sinist/punast ruutu. Saate hõljutada kursorit selle kohal ja näete mõnda võimalust selle suuruse muutmiseks.
Kui te ei näe vahetu akent üldse, siis siin on midagi, mis on paljudele inimestele korda läinud (see juhtub sageli ekraani eraldusvõime muutuste tõttu):
- Avage VB redaktor
- Vajutage Ctrl-G, et keskenduda vahetu aknale (või klõpsake menüü suvandit Vaade ja seejärel klõpsake vahetu akent)
- Hoidke all klahvi ALT ja seejärel vajutage tühikuklahvi. See näitab vahetu akna rippmenüüd.
- Vajutage M (liigutamiseks)
- Kasutage akna liigutamiseks nooleklahve
- Kui olete aru saanud, kus see asub, tehke see suuremaks
Sain selle siit foorumist ja märkasin ka sama soovitust lahenduseks, et VBA vahetu aken ei ilmu.
Teine asi, mida saate proovida, on vahetu akna lahtiühendamine (minge jaotisse Tööriistad -> Valikud -> Dokkimine ja tühjendage vahetu akna valik). See on mõnel inimesel toiminud.
Samuti võivad teile meeldida järgmised artiklid:
- Exceli isiklik makro töövihik | Makrode salvestamine ja kasutamine kõigis töövihikutes
- Exceli VBA ahelad: järgmiseks tehke aega, tehke kuni igaühe jaoks (näidetega)
- Töölehtedega töötamine Exceli VBA abil
- Kasutaja määratud funktsiooni (UDF) loomine Excel VBA -s
