Hoe de snelheid van VBA-macrocode te verbeteren?
In dit artikel zullen we leren hoe u macro's sneller kunt uitvoeren met draaipunten, met behulp van VBA-code.
Vraag): Ik werk aan een dashboard met een aanzienlijk aantal draaitabellen en draaigrafieken. Het probleem waarmee ik wordt geconfronteerd, is dat wanneer ik alle draaipunten ververs, het hele systeem vastloopt. Ik wil een magisch stukje code dat me zal helpen.
We moeten de onderstaande stappen volgen:
- Klik op het tabblad Ontwikkelaar
- Selecteer in de codegroep Visual Basic
Voer de volgende code in de standaardmodule in:
Subsnelle macro()Application.ScreenUpdating = False
Toepassing.Berekening = xlBerekeningHandmatig
ActiveWorkbook.RefreshAll
Application.ScreenUpdating = True
Toepassing.Berekening = xlBerekeningAutomatisch
Einde sub
De bovenstaande schermafbeelding bevat de berekeningsmodus in handmatige modus en schermupdates om aanvankelijk onwaar te zijn voordat alle draaipunten worden vernieuwd en vervolgens de berekeningsmodus om automatisch te zijn en schermupdates om waar te zijn.
Als u de bovenstaande aanpak volgt, zal dit resulteren in een aanzienlijke update in vergelijking met het eenvoudig vernieuwen van pivots.
Download - Macro's in draaipunten versnellen - xlsm