Application.StatusBar Property
2020年7月11日
Applicationオブジェクト.StatusBarプロパティ
ステータスバーのテキストを返すか設定します。
値の取得および設定が可能です。
構文
expression.StatusBar
※expression**Application** オブジェクトを 表す変数。
注釈
Microsoft Excel がステータスバーをコントロールしている場合、このプロパティはFalseを返します。 既定のステータスバーのテキストを復元するには、プロパティをFalseに設定します。この操作は、ステータスバーが非表示の場合でも動作します。
ステータスバーに「お待ちください」を表示。
Application.StatusBar = "お待ち下さい"
ステータスバーをもとに戻す。
Application.StatusBar = False
Application.DisplayStatusBar Propertiesで
ステータスバーの表示/非表示をコントロール。
ステータスバーを表示する。
Application.DisplayStatusBar = True
ステータスバーを表示しない。
Application.DisplayStatusBar = False
使用例
1 2 3 4 5 6 7 8 9 10 |
Sub pApplicationStatusBar() Application.DisplayStatusBar = True 'ステータスバーを表示する。 Application.StatusBar = "5秒間 お待ち下さい" 'ステータスバーに「お待ちください」を表示。 Application.Wait Now() + TimeValue("00:00:05") Application.StatusBar = False 'ステータスバーをもとに戻す。 End Sub |
