Az Excel állapotsorának elérése
Szeretné az állapotsort saját szövegének vagy információinak megjelenítésére makró végrehajtása közben?
Az állapotsor közvetlenül a tulajdonság használatával érhető el Application.StatusBar használat. Az alábbi makró bemutatja, hogyan kell ezt megtenni:
Állapotsor ()
Dim OnOff mint Boolean
OnOff = Application.DisplayStatusBar
Application.DisplayStatusBar = Igaz
Application.StatusBar = "Az üzenetem …"
'Ide írja be a parancsokat
Application.StatusBar = Hamis
Application.DisplayStatusBar = Ki
End Sub
A makró először rögzíti, hogy az állapotsor jelenleg látható vagy rejtett. Ezután a sáv bekapcsol, és az "Üzenetem ott jelenik meg. Az állapotsor visszaáll az alapértelmezett értékre. A sáv ekkor kikapcsol, ha azt is kikapcsolta a makró behívása előtt.
A makró futtatásakor az állapotsorban láthatja az új üzenetet: