Kā paātrināt makro rakursos

Anonim

Kā uzlabot VBA makro koda ātrumu?

Šajā rakstā mēs uzzināsim, kā ātrāk palaist makro, izmantojot rakursus, izmantojot VBA kodu.

Jautājums): Es strādāju pie informācijas paneļa, kurā ir ievērojams skaits rakurstabulu un tiek veidotas rakursdiagrammas. Problēma, ar kuru es saskaros, ir tad, kad atsvaidzinu visus šarnīrus, tad visa sistēma uzkaras. Es gribu maģisku koda gabalu, kas man palīdzēs.

Mums jāveic šādas darbības:

  • Noklikšķiniet uz cilnes Izstrādātājs
  • Kodu grupā atlasiet Visual Basic

Standarta modulī ievadiet šādu kodu

Sub FastMacro ()

Application.ScreenUpdating = Nepareizi

Application.Calculation = xlCalculationManual

ActiveWorkbook.RefreshAll

Application.ScreenUpdating = Patiess

Application.Calculation = xlCalculationAutomatic

Beigt apakš

Iepriekš redzamajā ekrānuzņēmumā ir aprēķina režīms manuālajā režīmā, un ekrāna atjaunināšana sākotnēji ir nepatiesa, pirms visu šarnīru atsvaidzināšanas, un pēc tam aprēķina režīms ir automātisks, un ekrāna atjaunināšana ir patiesa.

Ja sekojat iepriekšminētajai pieejai, tas tiks ievērojami atjaunināts, salīdzinot ar vienkāršu rakursu atsvaidzināšanu.

Lejupielādēt - Kā paātrināt makro Pivots - xlsm