W lewym dolnym rogu programu Excel znajdziesz pasek stanu:
Program Excel używa tego paska stanu do przekazywania Ci wiadomości. Jednak właściwość StatusBar można również dostosować za pomocą VBA, umożliwiając wyświetlanie własnych komunikatów.
Niestandardowy komunikat na pasku stanu
Możesz zaktualizować pasek stanu własną niestandardową wiadomością w programie Excel, gdy jest uruchomione makro, używając Pasek stanu własność.
1. Umieść ten kod w makrze za każdym razem, gdy chcesz zaktualizować użytkownika za pomocą niestandardowego komunikatu na pasku stanu:
1 | Application.StatusBar = "Teraz pracuję!!!" |
2. A na końcu makra umieść ten kod, aby wyczyścić pasek stanu i przywrócić kontrolę z powrotem do programu Excel:
1 | Application.StatusBar = FAŁSZ |
Wyłącz aktualizację paska stanu
Zamiast wyświetlać komunikat podczas wykonywania procedury, możesz wyłączyć pasek stanu. Zwiększy to szybkość kodu VBA, ponieważ program Excel może pominąć przetwarzanie komunikatu wyświetlanego na pasku stanu.
Aby wyłączyć aktualizację paska stanu podczas działania kodu, ustaw Pasek stanu wyświetlania właściwość na fałsz.
1 | Application.DisplayStatusBar = False |
Na końcu kodu przywróć aktualizację paska stanu:
1 | Application.DisplayStatusBar = Prawda |
Ważny! Użyj Pasek stanu właściwość, aby ustawić wiadomości, ale użyj Pasek stanu wyświetlania właściwość, aby całkowicie wyłączyć lub włączyć pasek stanu.
Przyspiesz kod VBA
Aby uzyskać optymalną szybkość przetwarzania, spróbuj użyć tego kodu:
12345678910111213141516 | sub RunFast()Application.ScreenUpdating = FałszApplication.DisplayStatusBar = FalseApplication.EnableEvents = FalseActiveSheet.DisplayPageBreaks = FałszApplication.Calculation = xlCalculationManual„Twój kod tutaj”Application.ScreenUpdating = PrawdaApplication.DisplayStatusBar = PrawdaApplication.EnableEvents = PrawdaActiveSheet.DisplayPageBreaks = PrawdaAplikacja.Calculation = xlCalculationAutomaticnapis końcowy |