Atviras darbo knygos įvykis | Darbo lapo keitimo įvykis
Įvykiai yra veiksmai, kuriuos atlieka naudotojai ir kurie suaktyvina Excel VBA vykdyti kodą.
Atviras darbo knygos įvykis
Prie darbo knygos atidarymo įvykio pridėtas kodas bus paleistas naudojant „Excel VBA“, kai atidarysite darbaknygę.
1. Atidarykite „Visual Basic“ redaktorius .
2. „Project Explorer“ dukart spustelėkite Ši darbo knyga.
3. Iš kairiojo išskleidžiamojo sąrašo pasirinkite Darbaknygė. Iš dešiniojo išskleidžiamojo sąrašo pasirinkite Atidaryti.
4. Į darbaknygės atidarymo įvykį įtraukite šią kodo eilutę:
„MsgBox“ „Labas rytas“5. Išsaugokite, uždarykite ir vėl atidarykite „Excel“ failą.
Rezultatas:
Darbo lapo keitimo įvykis
Į darbalapio keitimo įvykį įtrauktas kodas bus vykdomas naudojant „Excel VBA“, kai pakeisite darbalapio langelį.
kaip sukurti skaičių seką Excel
1. Atidarykite „Visual Basic“ redaktorius .
2. „Project Explorer“ dukart spustelėkite lapą (pavyzdžiui, Sheet1).
3. Iš kairiojo išskleidžiamojo sąrašo pasirinkite Darbo lapas. Iš dešiniojo išskleidžiamojo sąrašo pasirinkite Keisti.
Į darbalapio keitimo įvykį įtraukite šias kodo eilutes:
4. Darbo lapo keitimo įvykis išklauso visus 1 lapo pakeitimus. Mes tik norime, kad „Excel VBA“ ką nors padarytų, jei kažkas pasikeis B2 langelyje. Norėdami tai padaryti, pridėkite šias kodo eilutes:
JeiTarget.Address = '$ B $ 2'TadaGalas Jei
5. Mes norime, kad „Excel VBA“ rodytų „MsgBox“ tik tada, kai vartotojas įveda didesnę vertę nei 80. Norėdami tai padaryti, pridėkite šią kodo eilutę tarp If ir End If.
JeiTikslas. Vertė> 80Tada„MsgBox“ tikslas pasiektas6. 1 lape į B2 langelį įveskite didesnį nei 80 skaičių.
Rezultatas:
Eiti į kitą skyrių: Masyvas