ArbejdsarkFunktion | Skærmopdatering | DisplayAlerts | Beregning
Moderen til alle objekter er Excel selv. Vi kalder det Applikationsobjekt. Applikationsobjektet giver adgang til en masse Excel -relaterede muligheder.
ArbejdsarkFunktion
Du kan bruge egenskaben WorksheetFunction i Excel VBA for at få adgang til Excel -funktioner.
1. Placer f.eks. En kommandoknap på dit regneark, og tilføj følgende kodelinje:
Område ("A3"). Værdi = Application.WorksheetFunction.Average (Område ("A1: A2"))
Når du klikker på kommandoknappen på regnearket, beregner Excel VBA gennemsnittet af værdierne i celle A1 og celle A2 og placerer resultatet i celle A3.
Bemærk: i stedet for Application.WorksheetFunction.Average skal du blot bruge WorksheetFunction.Average. Hvis du ser på formellinjen, kan du se, at selve formlen ikke er indsat i celle A3. For at indsætte selve formlen i celle A3 skal du bruge følgende kodelinje:
Område ("A3"). Værdi = "= Gennemsnit (A1: A2)"
Skærmopdatering
Nogle gange kan du finde det nyttigt at deaktivere skærmopdatering (for at undgå flimmer), mens du udfører kode. Som følge heraf kører din kode hurtigere.
1. Placer f.eks. En kommandoknap på dit regneark, og tilføj følgende kodelinjer:
Dim i As Integer
For i = 1 Til 10000
Område ("A1"). Værdi = i
Næste i
Når du klikker på kommandoknappen på regnearket, viser Excel VBA hver værdi en lille brøkdel af et sekund, og det kan tage noget tid.
2. For at fremskynde processen skal du opdatere koden som følger.
Dim i As Integer
Application.ScreenUpdating = Falsk
For i = 1 Til 10000
Område ("A1"). Værdi = i
Næste i
Application.ScreenUpdating = True
Som følge heraf kører din kode meget hurtigere, og du vil kun se slutresultatet (10000).
DisplayAlerts
Du kan instruere Excel VBA om ikke at vise advarsler under udførelse af kode.
1. Placer f.eks. En kommandoknap på dit regneark, og tilføj følgende kodelinje:
ActiveWorkbook.Luk
Når du klikker på kommandoknappen på regnearket, lukker Excel VBA din Excel -fil og beder dig om at gemme de ændringer, du har foretaget.
2. Opdater koden på følgende måde for at instruere Excel VBA om ikke at vise denne advarsel under udførelse af kode.
Application.DisplayAlerts = Falsk
ActiveWorkbook.Luk
Application.DisplayAlerts = True
Som et resultat lukker Excel VBA din Excel -fil uden at bede dig om at gemme de ændringer, du har foretaget. Eventuelle ændringer går tabt.
Beregning
Som standard er beregningen indstillet til automatisk. Som følge heraf genberegner Excel projektmappen automatisk hver gang en værdi, der påvirker en formel, ændres. Hvis din projektmappe indeholder mange komplekse formler, kan du fremskynde din makro ved at indstille beregning til manuel.
1. Placer f.eks. En kommandoknap på dit regneark, og tilføj følgende kodelinje:
Application.Calculation = xlCalculationManual
Når du klikker på kommandoknappen på regnearket, sætter Excel VBA beregning til manuel.
2. Du kan bekræfte dette ved at klikke på Filer, Indstillinger, Formler.
3. Når du nu ændrer værdien af celle A1, genberegnes værdien af celle B1 ikke.
Du kan manuelt genberegne projektmappen ved at trykke på F9.
4. I de fleste situationer vil du indstille beregning til automatisk igen i slutningen af din kode. Tilføj blot følgende kodelinje for at opnå dette.
Application.Calculation = xlCalculationAutomatic
