OutlookアドインからVBAマクロを無効にしたい

Question

Outlookのメール誤送信対策として、簡易的に以下のようなVBAマクロがあります。

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim aExtAddrs() As String ' 社外宛アドレスリスト
    Dim iExtNum As Integer    ' 社外宛アドレス数
    Dim olRecip
    iExtNum = -1
    For Each olRecip In Item.Recipients
        If Not olRecip.Address Like "*@mydomain" Then
            iExtNum = iExtNum + 1
            ReDim Preserve aExtAddrs(iExtNum)
            aExtAddrs(iExtNum) = olRecip.Address
        End If
    Next
    if iExtNum >= 0 Then
        Dim sMsg As String, i As Integer
        sMsg = "社外宛のメールアドレスが含まれています。間違いはありませんか？"
        For i = 0 To UBound(aExtAddrs)
            sMsg = sMsg & vbCrLf & aExtAddrs(i)
        Next
        if MsgBox(sMsg, vbYesNo + vbQuestion, "送信前確認") <> vbYes
            Cancel = True ' 送信取消
            Exit Sub
        end if
    End If
End Sub

これをそのままアドインにしました。

Public Class ThisAddIn
    Private Sub ThisAddIn_Startup() Handles Me.Startup
        AddHandler Me.Application.ItemSend, AddressOf CatchItemSend
    End Sub
    Private Sub CatchItemSend(ByVal Item As Object, ByRef Cancel As Boolean)
        Dim aExtAddrs() As String ' 社外宛アドレスリスト
        Dim iExtNum As Integer    ' 社外宛アドレス数
        iExtNum = -1
        For Each olRecip As Outlook.Recipient In Item.Recipients
            If Not olRecip.Address Like "*@mydomain" Then
                iExtNum = iExtNum + 1
                ReDim Preserve aExtAddrs(iExtNum)
                aExtAddrs(iExtNum) = olRecip.Address
            End If
        Next
        if iExtNum >= 0 Then
            Dim sMsg As String, i As Integer
            sMsg = "社外宛のメールアドレスが含まれています。間違いはありませんか？"
            For i = 0 To UBound(aExtAddrs)
                sMsg = sMsg & vbCrLf & aExtAddrs(i)
            Next
            if MsgBox(sMsg, vbYesNo + vbQuestion, "送信前確認") <> vbYes
                Cancel = True ' 送信取消
                Exit Sub
            end if
        End If
    End Sub
End Class

こうした場合、アドインをインストールした時にVBAマクロを削除しないと、二重にItemSendイベントハンドラが設定された状態になり、両方の処理が呼ばれます。（同時あるいは逐次的）なので、VBAマクロを無効にしたいのですが、適当な方法に悩んでいます。

単純なのは、アドインをインストールする時にVBAマクロを手で削除することですが、人手に頼ることになり避けたいです。（できれば自動で行いたい）

アドイン本体は共有の場所に置いてsetup.exeでインストールを行う予定ですが、そのインストーラでOutlookの持つVBAマクロを取得できたり、一部のマクロ（今回ではApplication_ItemSend）を無効にする方法はあったりするでしょうか？
※VBAマクロ全体を抑止するのは、他に必要な処理もあるため出来ません。

アドバイスをいただければ助かります。よろしくお願いします。

Answer 1

プログラム的にOutlookマクロを無効にしたり編集するのは無理なようです。
マクロのOTMファイルは独自の形式で、これを直接編集することはできないそうです。
また、レジストリキーを設定変更して、Outlookマクロ全体を抑止することは出来そうですが、これはニーズに合致しません。
なので、人手に頼るのはやむを得ない、が現時点の結論です。