Outlook 2010 vsto アドインを Outlook 2013 に移行しようとしています。コンテキスト メニューを追加しようとする 1 つの問題を除いて、すべてうまくいきました。
Outlook 2010 で次のコードを実行すると、メニューに「Gradwell との連絡先に電話」が追加されます - Happy Days!
Private Sub ThisAddIn_Startup(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Startup
AddHandler Application.ItemContextMenuDisplay, AddressOf Application_ItemContextMenuDisplay
End Sub
Sub Application_ItemContextMenuDisplay(ByVal CommandBar As Microsoft.Office.Core.CommandBar, ByVal Selection As Microsoft.Office.Interop.Outlook.Selection)
If Selection.Count = 1 Then
If Selection.Item(1).class = olContactclass Then
CallContactButton = CommandBar.Controls.Add(Office.MsoControlType.msoControlButton)
With CallContactButton
.BeginGroup = True
.Caption = "Call contact with Gradwell"
.Parameter = Selection.Item(1).EntryID
.FaceId = 17
End With
End If
End If
End Sub
しかし、Outlook 2013 でコードを実行すると、メニューが表示されません。
コードをデバッグすると、Sub Application_ItemContextMenuDisplay も起動しません。
なぜこれが機能しないのか、誰でも提案できますか?
ありがとう