Kas peate Exceli käivitamisel käivitama makro? Teil on kaks võimalust.
1. Looge alamraamat „See töövihik” töövihik_Avatud ().
2. Asetage Auto_Open () alam suvalisse moodulisse.
Töövihik_Avatud sündmus
Looge jaotises „See töövihik” alampealkiri „Töövihiku avamine”
| 123 | Töövihiku_ava ()MsgBox "See kood jooksis Exceli käivitamisel!"End Sub |
Auto_Open
Teise meetodi kasutamine: looge lihtsalt alamprogramm nimega Auto_Open ja asetage sinna kood või helistage sealt teisele alamprogrammile. Exceli käivitamisel käivitub teie kood automaatselt.
| 123 | Privaatne alam automaatne avamine ()MsgBox "See kood jooksis Exceli käivitamisel!"End Sub |
Looge ja nimetage uus tööleht iga kord, kui Excel avaneb
Järgmine kood töötab töövihiku avamisel. See lisab automaatselt uue lehe ja lisab sellele kuupäeva. Samuti kontrollitakse, kas lehte pole juba olemas - et seda saaks avada rohkem kui üks kord päevas.
See kood kasutab töövihiku avatud sündmust ja see tuleb paigutada töövihiku moodulisse sündmuse „Avatud tööraamat” alla. Funktsioon Sheet_Exist tuleb paigutada moodulisse ja see kontrollib, kas leht on olemas või mitte:
| 123456789101112131415 | Privaatne alamtöövihik_Avatud ()Hämarda uus_lehe_nimi stringinaNew_Sheet_Name = Vorming (kohe (), "pp-kk-aaa")Kui Sheet_Exists (New_Sheet_Name) = Vale SiisTöövihikugaTöölehed.Add (). Nimi = Uus_lehe_nimiLõpetaLõpp KuiSalvestaEnd Sub |
| 12345678910111213 | Funktsioonileht_Olemas (töölehe_nimi kui string) kui loogilineTöölehe hämardamine töölehenaSheet_Exists = ValeIga töövihiku jaoks käesolevas töövihikus. TöölehedIf Work_sheet.Name = Töölehe_nimi SiisSheet_Exists = TõsiLõpp KuiEdasiLõppfunktsioon |
Selle õpetuse jaoks .XLSM -faili allalaadimiseks klõpsake siin
Määrake vaikeleht töövihiku avamisel
Kas soovite veenduda, et töövihiku avamisel kuvatakse alati alati leht? Näiteks töövihiku lehe avamisel3 on alati aktiivne leht. Siin on, kuidas.
Saate viidata VBA -lehele selle programmi nime (st Sheet3) või vahekaardi nime (st JanData) järgi. Parim on kasutada programmi nime, sest kui vahekaardi nimi muutub, ei tööta teie vahekaardi nimele viitav VBA -kood enam. Kui aga kasutate programmi nime, saab kasutaja vahekaardi nime mitu korda muuta ja teie makro töötab endiselt.
Veendumaks, et teatud leht on alati aktiveeritud, kui töövihik avaneb, lihtsalt asetage sheet.activate kood alamraamatusse workbook_open. See on näide, mis aktiveerib lehe 3, kasutades programmi nime iga kord, kui töövihik avaneb.
| 123 | Privaatne alamtöövihik_Avatud ()Leht 3. AktiveeriEnd Sub |
Ja seda tehakse vahekaardi nime kasutades:
| 1234 | Privaatne alamtöövihik_Avatud ()Arvutustabelid ("mytabname"). AktiveerigeEnd Sub |
Sidenote: selle toimimiseks peate Exceli salvestama ja taaskäivitama.
Sidenote: See toimib ainult siis, kui makrod on lubatud.
Kõrvalmärkus: pange see kood VBE -s oleva ThisWorkbooki objekti koodi aknasse.
Laadimisvorm iga kord, kui töövihik avaneb
Kui soovite Exceli töövihiku avamisel vormi laadida või mõnda VBA -koodi käivitada, asetage oma kood selle töövihiku koodi aknasse ja alamraamatusse Workbook_Open.
Arvutustabelist tehke järgmist.
1. Vajutage ALT ja F11, et avada VB redaktor
2. Koodiakna avamiseks topeltklõpsake sõna ThisWorkbook
3. Sisestage ThisWorkbooki koodi aknasse järgmine kood
| 123 | Privaatne alamtöövihik_Avatud ()UserForm1.ShowEnd Sub |
Sidenote: asendage Userform1 oma vormi nimega
4. Sulgege Excel ja avage uuesti.
