Opdatering af statuslinje - eksempler på VBA -kode

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

Du vil bidrage til udviklingen af ​​hjemmesiden, at dele siden med dine venner

wave wave wave wave wave