Application.StatusBar (Excel)

Retorna ou define o texto na barra de status. String de leitura/gravação.

Esta propriedade retorna False se o Microsoft Excel tiver o controle da barra de status. Para restaurar o texto padrão da barra de status, defina a propriedade como False; isso funcionará mesmo se a barra de status estiver oculta.

oldStatusBar = Application.DisplayStatusBar 
Application.DisplayStatusBar = True 
Application.StatusBar = "Please be patient..." 
Workbooks.Open filename:="LARGE.XLS" 
Application.StatusBar = False 
Application.DisplayStatusBar = oldStatusBar