Outlookリボン：VBAのボタントグル

Question

メールを受信したときに行動を実行するために、Outlookの内部でvbaにリスナーを作成しました。

Outlookリボンのボタンを使用してこの機能を有効または無効にすることができます。

現在の状態（オン/オフ）を知るには、ボタン上の2つの画像（緑色/赤色）を切り替えたいと思います。

ボタンをクリックしたときにボタンの画像を変更する方法を知っている人はいますか？

Answer 1

これを具体的に行う方法や実行可能な場合でも、実行時にグループの可視プロパティを編集することはできます。したがって、赤と緑の2つの画像を持つ2つのグループを持つことができます。この場合、私はアクションと呼ばれるグループを持っている、と私はそれが見える/見えないようにする方法を示します：

XML - ここ

<group id="customGroup1" label="Actions" getVisible="CallbackGetVisible"> 

</group> 

公開/モジュールレベルの宣言でコントロールとしてあなたのボタンを配置します。これは、グループが表示されるかどうかを決定する又は

Public bShowActions As Boolean 

CallbackGetVisibleは、グループの可視性を設定するためにXMLによって呼び出されません。可視性はbShowActionsによって決定されます

Sub CallbackGetVisible(control As IRibbonControl, ByRef visible) 
On Error GoTo err_Handle 
Const strError As String = "'CallbackGetVisible'" 

    'Don't Re-Set The Value If It's Already The Same 
    If bShowActions = visible Then GoTo Cleanup 
    visible = bShowActions 
    GoTo Cleanup 

'Set Any Objects to Nothing, Exits Routine 
Cleanup: 
    Exit Sub 
'Throw Error 
err_Handle: 
    'Handle your error here 
    Resume Cleanup 
End Sub 

これは簡単ではありませんが、必要なものを達成できるはずです。