Как обрабатывать нажатие на кнопку для форм писем Outlook?

Хочу в форме письма создать свою кнопку. В момент создания формы письма (событие добавления объекта в коллекции Inspectors) создаю CommandBar и кнопку:
Private Sub Insps_NewInspector(ByVal Inspector As Outlook.Inspector)
Dim ToolBar As CommandBar

Set ToolBar = Inspector.CommandBars.Add(Name:="Test", Position:=MsoBarPosition.msoBarTop, Temporary:=True)
ToolBar.Visible = True

'' Создание кнопок на ToolBar
Set Ctrl = ToolBar.FindControl(Type:=MsoControlType .msoControlButton, Tag:="Test")
If Ctrl Is Nothing Then
Set Ctrl = ToolBar.Controls.Add(Type:=MsoControlTyp e.msoControlButton, Temporary:=True)
With Ctrl
.Caption = "Test"
.Tag = "Test"
.Visible = True
.OnAction = "!" + AddIn.ProgId
End With
End If

End Sub

Для кнопки задаю обработку нажатия:

Private Sub Ctrl_Click(ByVal Ctrl As Office.CommandBarButton, CancelDefault As Boolean)
MsgBox ("Test")
End Sub

Вся проблема в том, что писем может открываться много и обработка нажатия кнопки будет работать только для последнего открытого письма. Можно ли каким-то образом сделать чтобы, нажатие обрабатывалось для всех открытых писем?

0