CommandBarButton.Picture プロパティ (Office)

取得または、 CommandBarButton オブジェクトのイメージを表す IPictureDisp オブジェクトを設定します。 値の取得と設定が可能です。

注:

[!メモ] 一部の Microsoft Office アプリケーションにおける CommandBars の使用方法が、Microsoft Office Fluent ユーザー インターフェイスの新しいリボン コンポーネントによって置き換えられました。 詳細については、「Office Fluent リボンの概要」を参照してください。

構文

式。画像

表現CommandBarButton オブジェクトを表す変数。

解説

ボタンの画像を変更する場合は、Mask プロパティを使用して マスク イメージを設定することもできます。 マスク イメージは、透明ボタン イメージのどの部分を指定します。 常に、 CommandBarButton オブジェクトの画像を設定した後は、マスクを設定します。

注:

Visual Basic エディターの [標準] ツール バーの [Microsoftアプリケーションの表示] ボタンと [アイテムの挿入] ボタンの画像は変更できません。

例

次の例では、イメージとコードを返す最初の CommandBarButton のマスクを設定します。 この作業をするためには、マスク イメージとボタン イメージを作成し、イメージのパスをサンプルのパスに代入します。

Sub ChangeButtonImage() 
    Dim picPicture As IPictureDisp 
    Dim picMask As IPictureDisp 
 
    Set picPicture = stdole.StdFunctions.LoadPicture( _ 
        "c:\images\picture.bmp") 
    Set picMask = stdole.StdFunctions.LoadPicture( _ 
        "c:\images\mask.bmp") 
 
    'Reference the first button on the first command bar 
    'using a With...End With block. 
    With Application.CommandBars.FindControl(msoControlButton) 
        'Change the button image. 
        .Picture = picPicture 
 
        'Use the second image to define the area of the 
        'button that should be transparent. 
        .Mask = picMask 
    End With 
End Sub

次の例を返し、それぞれのファイルに出力されるイメージと最初の CommandBarButton のマスクを取得します。 この作業をするためには、出力ファイルのパスを指定します。

Sub GetButtonImageAndMask() 
    Dim picPicture As IPictureDisp 
    Dim picMask As IPictureDisp 
 
    With Application.CommandBars.FindControl(msoControlButton) 
        'Get the button image and mask of this CommandBarButton object. 
        Set picPicture = .Picture 
        Set picMask = .Mask 
    End With 
 
    'Save the button image and mask in a folder. 
    stdole.SavePicture picPicture, "c:\image.bmp" 
    stdole.SavePicture picMask, "c:\mask.bmp" 
End Sub 

関連項目

• CommandBarButton オブジェクト メンバー

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。