Jak získat přístup ke stavovému řádku aplikace Excel
Chtěli byste použít stavový řádek k zobrazení vlastního textu nebo informací během provádění makra?
Do stavového řádku se dostanete přímo pomocí vlastnosti Application.StatusBar použití. Následující makro ukazuje, jak to provést:
Dílčí stavový řádek ()
Dim OnOff As Boolean
OnOff = Application.DisplayStatusBar
Application.DisplayStatusBar = True
Application.StatusBar = "Moje zpráva …"
'Sem vložte příkazy
Application.StatusBar = False
Application.DisplayStatusBar = Zapnuto Vypnuto
End Sub
Makro nejprve zaznamená, zda je stavový řádek aktuálně zobrazen nebo skryt. Poté se zapne lišta a zobrazí se text „Moje zpráva je tam na výstupu. Stavový řádek se poté resetuje na výchozí hodnotu. Lišta se pak vypne, pokud byla také vypnuta před vyvoláním makra.
Když spustíte makro, ve stavovém řádku se zobrazí nová zpráva:
