2

Excel VBA を使用して、新しい CommandBar ([アドイン] タブ用) にボタンを追加しようとしています。ボタンをリボンに挿入して、FaceId を使用すると画像を表示できますが、キャプションを表示できません。これを行う方法はありますか？代わりに画像を使用する必要がありますか?

With Application.CommandBars.Add("Open Forms")
    With .Controls.Add(msoControlButton)
        .OnAction = "ThisWorkbook.FunctionFunction"
        .Caption = "Call the Function"
    End With

    .Visible = True
End With
4

1 に答える 1

2

次のように、新しいボタンのスタイル プロパティを設定する必要があります。

    .Style = msoButtonIconAndCaption

スタイルには他のオプションがあります (msoButtonCaption など)。リストはインテリセンスで簡単に見ることができます。

于 2009-12-27T17:36:20.450 に答える