'Ready' message bar

G

Guest

Does anyone know what the message bar underneath the tabs
is called. It usually displays 'Ready'

Is it possible to put a message in here, if it is, how?

thanks

John
 
I

icestationzbra

Sub msg()

Application.StatusBar = "hi"

End Sub

Sub clr()

Application.StatusBar = ""

End Su
 
B

Bob Phillips

It's called the Status bar.

Befor writging to it, it is best to save the current state and revert later

Dim oldStatusBar
Dim stateStatusBar As Boolean

Sub Write_StatusBar()

With Application
stateStatusBar = .StatusBar
oldStatusBar = .DisplayStatusBar
.DisplayStatusBar = True
.StatusBar = "Developed by ........"
End With

End Sub

Sub Revert_StatusBar()

Application.StatusBar = stateStatusBar
Application.DisplayStatusBar = oldStatusBar

End Sub



--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
Top