Kaip padidinti VBA makro kodo greitį?
Šiame straipsnyje mes sužinosime, kaip greičiau paleisti makrokomandas naudojant „Pivots“, naudojant VBA kodą.
Klausimas): Aš dirbu prie prietaisų skydelio, kuriame yra daug suvestinių lentelių ir sukuriamų diagramų. Problema, su kuria susiduriu, yra tada, kai atnaujinu visas šerdis, tada visa sistema užstringa. Noriu magiško kodo, kuris man padėtų.
Turime atlikti šiuos veiksmus:
- Spustelėkite skirtuką Kūrėjas
- Kodo grupėje pasirinkite „Visual Basic“
Į standartinį modulį įveskite šį kodą
„Fast FastMacro“ ()Application.ScreenUpdating = Netiesa
Application.Calculation = xlCalculationManual
ActiveWorkbook.RefreshAll
Application.ScreenUpdating = Tiesa
Application.Calculation = xlCalculationAutomatic
Pabaiga Sub
Aukščiau esančioje ekrano kopijoje yra skaičiavimo režimas rankiniu režimu, o ekrano atnaujinimas iš pradžių yra klaidingas, prieš atnaujinant visas suvestines, o tada skaičiavimo režimas turi būti automatinis, o ekrano atnaujinimas - teisingas.
Jei laikysitės aukščiau pateikto metodo, tai bus žymiai atnaujinta, palyginti su paprastu šarnyrų atnaujinimu.
Parsisiųsti - Kaip pagreitinti makrokomandas „Pivots“ - xlsm