本示例用于切换状态栏。

Application.DisplayStatusBar = Not Application.DisplayStatusBar

 

本示例用于显示滚动条和状态栏。

With Application
    .DisplayScrollBars = True
    .DisplayStatusBar = True
End With