诓骗VBA加载与取消加载宏文献，主要使用到AddIns对象、AddIn对象的属性与阵势。操作后果如下所示：

1.装配加载宏文献

Sub 装配加载宏文献() AddIns.Add("D:\我的代码箱.xlam").Installed = TrueEnd Sub

2.取消加载宏文献

Sub 取消加载宏文献() '要取消加载宏文献的称号 Dim addInName As String addInName = "我的代码箱.xlam" ' 遍历所有加载的插件 Dim addIn As addIn For Each addIn In Application.AddIns If addIn.Name = addInName Then addIn.Installed = False Exit Sub End If NextEnd Sub

3.批量取消加载宏文献

Sub 批量取消加载宏文献() Dim addIn As addIn For Each addIn In Application.AddIns addIn.Installed = False NextEnd Sub

上一篇：乌鲁木皆智能充电桩系统开荒有磋磨    下一篇：西周沦陷后，东周还合手续了500多年，为何周王室没东说念主能一统六合？