如果存在加载项，则Unistall

Question

我想要的VBA代码可以检查加载项列表中是否存在加载项

像

这样的东西

If Application.AddIns("Upload Button") Exists Then
   Application.AddIns("Upload Button").Installed = False
End If

回击我！

编辑：我使用On Error Resume Next

解决了这个问题

On Error Resume Next
Application.AddIns("Upload Button").Installed = False
On Error Goto 0