Application.DisplayStatusBar = True
Pak už můžete do stavového řádku posílat své informace
Application.StatusBar = "text"
Informace neočekává odpověď a zůstane zobrazená, dokud ji sám nezměníte.
Stavový řádek uvedete do původního tvaru příkazem
Application.StatusBar = False
citovat