TöölehtFunktsioon | Ekraani värskendamine | DisplayAlerts | Arvutus
Kõigi objektide ema on Excel ise. Me nimetame seda Rakenduse objekt. Rakenduse objekt võimaldab juurdepääsu paljudele Exceli seotud valikutele.
TöölehtFunktsioon
Atribuuti WorksheetFunction saate kasutada asukohas Exceli VBA pääsete juurde Exceli funktsioonidele.
1. Näiteks pange oma töölehele käsunupp ja lisage järgmine koodirida:
Vahemik ("A3"). Väärtus = Application.WorksheetFunction.Average (Vahemik ("A1: A2"))
Kui klõpsate töölehel käsunuppu, arvutab Excel VBA lahtri A1 ja lahtri A2 väärtuste keskmise ning paigutab tulemuse lahtrisse A3.
Märkus. Rakenduse Application.WorksheetFunction.Average asemel kasutage lihtsalt WorksheetFunction.Average. Kui vaatate valemiriba, näete, et valem ise pole lahtrisse A3 sisestatud. Valemi lahtrisse A3 sisestamiseks kasutage järgmist koodirida:
Vahemik ("A3"). Väärtus = "= KESKMINE (A1: A2)"
Ekraani värskendamine
Mõnikord võib osutuda kasulikuks koodi täitmise ajal ekraani värskendamise keelamine (välkumise vältimiseks). Selle tulemusel töötab teie kood kiiremini.
1. Näiteks pange oma töölehele käsunupp ja lisage järgmised koodiridad:
Dim i As täisarv
I = 1 kuni 10 000
Vahemik ("A1"). Väärtus = i
Edasi i
Kui klõpsate töölehel käsunuppu, kuvab Excel VBA iga väärtuse väikese osa sekundist ja see võib võtta aega.
2. Protsessi kiirendamiseks värskendage koodi järgmiselt.
Dim i As täisarv
Application.ScreenUpdating = Vale
I = 1 kuni 10 000
Vahemik ("A1"). Väärtus = i
Edasi i
Application.ScreenUpdating = Tõsi
Selle tulemusel töötab teie kood palju kiiremini ja näete ainult lõpptulemust (10000).
Display -hoiatused
Saate käsu Excel VBA mitte kuvada hoiatusi koodi täitmise ajal.
1. Näiteks pange oma töölehele käsunupp ja lisage järgmine koodirida:
ActiveWorkbook.Sulge
Kui klõpsate töölehel käsunuppu, sulgeb Excel VBA teie Exceli faili ja palub teil tehtud muudatused salvestada.
2. Kui soovite, et Excel VBA ei näitaks seda hoiatust koodi täitmise ajal, värskendage koodi järgmiselt.
Application.DisplayAlerts = Vale
ActiveWorkbook.Sulge
Application.DisplayAlerts = Tõsi
Selle tulemusel sulgeb Excel VBA teie Exceli faili, palumata teil tehtud muudatused salvestada. Kõik muudatused lähevad kaduma.
Arvutus
Vaikimisi on arvutamine seatud automaatseks. Selle tulemusel arvutab Excel töövihiku automaatselt ümber iga kord, kui valemit mõjutav väärtus muutub. Kui teie töövihik sisaldab palju keerulisi valemeid, saate oma makro kiirendada, määrates arvutamise käsitsi.
1. Näiteks pange oma töölehele käsunupp ja lisage järgmine koodirida:
Application.Calculation = xlCalculationManual
Kui klõpsate töölehel käsunuppu, määrab Excel VBA arvutamise käsitsi.
2. Seda saate kontrollida, klõpsates nuppu Fail, Valikud, Valemid.
3. Nüüd, kui muudate lahtri A1 väärtust, ei arvutata lahtri B1 väärtust ümber.
Töövihiku saate käsitsi ümber arvutada, vajutades klahvi F9.
4. Enamikul juhtudel määrate koodi lõpus arvutamise uuesti automaatseks. Selle saavutamiseks lisage lihtsalt järgmine koodirida.
Application.Calculation = xlCalculationAutomatic