Typo: applicationstatusbar = ""
should be: Application.Statusbar = ""

"Norman Jones" wrote in message
...
Hi RBS,

Sub DemoStatusbar()
Dim aStr As String
Debug.Print Application.StatusBar
Application.StatusBar = "My Message"
Debug.Print Application.StatusBar
aStr = Application.StatusBar & " to the world"
Application.StatusBar = aStr
Debug.Print Application.StatusBar
applicationstatusbar = ""
Debug.Print Application.StatusBar
End Sub

---
Regards,
Norman

"RB Smissaert" wrote in message
...
Using Excel XP and 2003.
Is there any way to get the message of the statusbar into a string
variable?
It doesn't seem you can as the documentation says that if Excel has
control
over the statusbar the return value is False and that is indeed so.
The reason why I am interested to get this string is that I have to make
a
new
statusbar message out of the existing one plus another string.
Would any API method help here?

RBS