CommandBarButton.State プロパティ (Office)
CommandBarButton コントロールの外観を取得または設定します。 値の取得と設定が可能です。
構文
式。状態
expression 必須です。 CommandBarButton オブジェクトを表す変数を指定します。
注釈
組み込みのコマンド バー ボタンの State プロパティは読み取り専用です。 Type プロパティの値は、msoButtonState 列挙の値として使用できます。
例
次の使用例は、 Custom という名前のコマンド バーを作成し、それに 2 つのボタンを追加します。 MsoButtonUp に左側のボタンを設定し、 msoButtonDown に右側のボタンを設定します。
Dim myBar As Office.CommandBar
Dim imgSource As Office.CommandBarButton
Dim myControl1 As Office.CommandBarButton
Dim myControl2 As Office.CommandBarButton
' Add new command bar.
Set myBar = CommandBars.Add(Name:="Custom", Position:=msoBarTop, Temporary:=True)
' Add 2 buttons to new command bar.
With myBar
.Controls.Add Type:=msoControlButton
.Controls.Add Type:=msoControlButton
.Visible = True
End With
' Paste Bold button face and set State of first button.
Set myControl1 = myBar.Controls(1)
Set imgSource = CommandBars.FindControl(msoControlButton, 113)
imgSource.CopyFace
With myControl1
.PasteFace
.State = msoButtonUp
End With
' Paste italic button face and set State of second button.
Set myControl2 = myBar.Controls(2)
Set imgSource = CommandBars.FindControl(msoControlButton, 114)
imgSource.CopyFace
With myControl2
.PasteFace
.State = msoButtonDown
End With
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。