expression.StatusBar
expression Required. An expression that returns an Application object.
Example
This example displays a message in the status bar.
StatusBar = "Please wait..."
This example displays in the status bar the name of the template attached to the active document.
aName = ActiveDocument.AttachedTemplate.Name
StatusBar = aName & " template is attached to the active document"