I nederste venstre hjørne af Excel finder du en statuslinje:
Excel bruger denne statuslinje til at kommunikere meddelelser til dig. StatusBar -ejendommen kan dog også justeres ved hjælp af VBA, så du kan vise dine egne meddelelser.
Besked om tilpasset statuslinje
Du kan opdatere statuslinjen med din egen tilpassede meddelelse i Excel, mens en makro kører, ved hjælp af Statuslinje ejendom.
1. Placer denne kode i en makro, når du vil opdatere brugeren med en brugerdefineret statuslinjemeddelelse:
1 | Application.StatusBar = "Jeg arbejder nu !!!" |
2. Og i slutningen af din makro skal du placere denne kode for at rydde statuslinjen og returnere kontrollen tilbage til Excel:
1 | Application.StatusBar = FALSE |
Deaktiver opdatering af statuslinje
I stedet for at vise en meddelelse, mens din procedure kører, kan du deaktivere statuslinjen. Dette øger hastigheden på din VBA -kode, da Excel kan springe over behandlingen af, hvilken statuslinjemeddelelse der skal vises.
For at deaktivere opdatering af statuslinjen, mens din kode kører, skal du angive DisplayStatusBar ejendom til falsk.
1 | Application.DisplayStatusBar = Falsk |
I slutningen af din kode skal du gendanne opdatering af statuslinjen:
1 | Application.DisplayStatusBar = True |
Vigtig! Brug Statuslinje ejendom til at indstille meddelelser, men brug DisplayStatusBar ejendom for helt at deaktivere eller aktivere statuslinjen.
Fremskynd VBA -koden
For at få optimal behandlingshastighed, prøv at bruge denne kode:
12345678910111213141516 | sub RunFast ()Application.ScreenUpdating = FalskApplication.DisplayStatusBar = FalskApplication.EnableEvents = FalskActiveSheet.DisplayPageBreaks = FalskApplication.Calculation = xlCalculationManual'Din kode herApplication.ScreenUpdating = TrueApplication.DisplayStatusBar = TrueApplication.EnableEvents = TrueActiveSheet.DisplayPageBreaks = TrueApplication.Calculation = xlCalculationAutomaticslut sub |