如何检查是否为使用VBA的Macintosh用户安装了Excel加载项

使用VBA，我可以检测是否为Windows Microsoft Office-Excel安装了特定的加载项，但在MacOS Microsoft Office-Excel中执行时无法检测相同的代码

下面是我尝试在Microsoft Excel 2016 for Macintosh中执行的代码示例

Private Sub Workbook_Open()

rw = 0
flag = 0
If InStr(Application.OperatingSystem, "Macintosh") Then
For Each ad In Application.AddIns
    If flag > 0 Then
        Exit For
    Else
        If InStr(ad.Name, "Vena") Then
            MsgBox "Vena add-in is installed."
            flag = 1
        Else
            MsgBox "Vena add-in is not installed."
        End If
        rw = rw + 1
    End If
Next
Else
MsgBox "Vena is not compatible with your Operating System."
End If
End Sub

在MacOS Microsoft Office环境中，安装了Excel加载项。但是，当我执行代码时，我会收到通知说没有安装外接程序。错误消息的屏幕截图：

---

如果安装了任何其他外接程序，则代码会给出该消息，因为它会显示名称中没有Vena的任何外接程序的消息。我的建议是：

Private Sub Workbook_Open()

rw = 0
flag = 0
If InStr(Application.OperatingSystem, "Macintosh") Then
    For Each ad In Application.AddIns
        If InStr(1, ad.Name, "Vena", vbtextcompare) Then
            MsgBox "Vena add-in is installed."
            flag = 1
            Exit For
        End If
    Next
    If flag = 0 then MsgBox "Vena add-in is not installed."
Else
    MsgBox "Vena is not compatible with your Operating System."
End If
End Sub

---

如果您安装了任何其他外接程序，您的代码将给出该消息，因为它会显示名称中没有Vena的任何外接程序的消息。我的建议是：

Private Sub Workbook_Open()

rw = 0
flag = 0
If InStr(Application.OperatingSystem, "Macintosh") Then
    For Each ad In Application.AddIns
        If InStr(1, ad.Name, "Vena", vbtextcompare) Then
            MsgBox "Vena add-in is installed."
            flag = 1
            Exit For
        End If
    Next
    If flag = 0 then MsgBox "Vena add-in is not installed."
Else
    MsgBox "Vena is not compatible with your Operating System."
End If
End Sub

---

您是否知道Mac版Excel是否有方法检测是否安装了外接程序？您是否知道Mac版Excel是否有方法检测是否安装了外接程序？