I det nedre vänstra hörnet av Excel hittar du ett statusfält:
Excel använder detta statusfält för att kommunicera meddelanden till dig. Men StatusBar -egenskapen kan också justeras med VBA, så att du kan visa dina egna meddelanden.
Anpassat statusfältmeddelande
Du kan uppdatera statusfältet med ditt eget anpassade meddelande i Excel medan ett makro körs med hjälp av Statusfältet fast egendom.
1. Placera den här koden i ett makro när du vill uppdatera användaren med ett anpassat statusfältmeddelande:
1 | Application.StatusBar = "Jag jobbar nu !!!" |
2. Och i slutet av ditt makro placerar du den här koden för att rensa statusfältet och återvända till Excel:
1 | Application.StatusBar = FALSE |
Inaktivera uppdatering av statusfält
Istället för att visa ett meddelande medan proceduren körs kan du inaktivera statusfältet. Detta kommer att öka hastigheten på din VBA -kod eftersom Excel kan hoppa över att bearbeta vilket statusfältmeddelande som ska visas.
För att inaktivera statusfältets uppdatering medan koden körs ställ in DisplayStatusBar egendom till falsk.
1 | Application.DisplayStatusBar = Falskt |
I slutet av din kod, återställ statusfältets uppdatering:
1 | Application.DisplayStatusBar = True |
Viktig! Använd Statusfältet egenskap för att ställa in meddelanden, men använd DisplayStatusBar egendom för att inaktivera eller aktivera statusfältet helt och hållet.
Snabba upp VBA -koden
För optimal bearbetningshastighet, försök använda den här koden:
12345678910111213141516 | sub RunFast ()Application.ScreenUpdating = FalsktApplication.DisplayStatusBar = FalsktApplication.EnableEvents = FalsktActiveSheet.DisplayPageBreaks = FalsktApplication.Calculation = xlCalculationManual'Din kod härApplication.ScreenUpdating = TrueApplication.DisplayStatusBar = TrueApplication.EnableEvents = TrueActiveSheet.DisplayPageBreaks = TrueApplication.Calculation = xlCalculationAutomaticslut sub |