Nederst til venstre i Excel finner du en statuslinje:
Excel bruker denne statuslinjen til å kommunisere meldinger til deg. StatusBar -egenskapen kan imidlertid også justeres ved hjelp av VBA, slik at du kan vise dine egne meldinger.
Egendefinert statuslinjemelding
Du kan oppdatere statuslinjen med din egen tilpassede melding i Excel mens en makro kjører, ved hjelp av Statuslinjen eiendom.
1. Plasser denne koden i en makro når du vil oppdatere brukeren med en egendefinert statuslinjemelding:
1 | Application.StatusBar = "Jeg jobber nå !!!" |
2. Og på slutten av makroen plasserer du denne koden for å slette statuslinjen og returnere kontrollen tilbake til Excel:
1 | Application.StatusBar = FALSE |
Deaktiver oppdatering av statuslinje
I stedet for å vise en melding mens prosedyren din kjører, kan du deaktivere statuslinjen. Dette vil øke hastigheten på VBA -koden din, ettersom Excel kan hoppe over behandlingen av statuslinjemeldingen som skal vises.
For å deaktivere oppdatering av statuslinjen mens koden din kjører, angi DisplayStatusBar eiendom til falsk.
1 | Application.DisplayStatusBar = Falsk |
På slutten av koden gjenoppretter du oppdateringen av statuslinjen:
1 | Application.DisplayStatusBar = True |
Viktig! Bruke Statuslinjen egenskapen for å angi meldinger, men bruk DisplayStatusBar eiendom for å deaktivere eller aktivere statuslinjen helt.
Fremskynde VBA -koden
For optimal behandlingshastighet, prøv å bruke denne koden:
12345678910111213141516 | sub RunFast ()Application.ScreenUpdating = FalskApplication.DisplayStatusBar = FalskApplication.EnableEvents = FalskActiveSheet.DisplayPageBreaks = FalskApplication.Calculation = xlCalculationManual'Koden din herApplication.ScreenUpdating = TrueApplication.DisplayStatusBar = TrueApplication.EnableEvents = TrueActiveSheet.DisplayPageBreaks = TrueApplication.Calculation = xlCalculationAutomaticslutt sub |