全部显示

AddIn 对象

Application AddIns (AddIn)

加载或未加载的对象都代表单个加载宏。AddIn 对象是 AddIns 集合的成员之一。无论是否加载 PowerPoint 指定的加载宏，AddIns 集合都包含所有可用的加载宏。该集合不包含组件对象模型 (COM) 加载宏。

使用 AddIn 对象

使用 AddIns(index) 返回单个 AddIn 对象，其中 index 是加载宏的标题或索引编号。以下示例加载 My Ppt Tools 加载宏。

AddIns("my ppt tools").Loaded = True

不要将显示在上方的加载宏标题与加载宏名称相混淆，该名称是加载宏的文件名。在 Add-Ins 对话框中键入该标题时必须正确拼写，但是不一定要大写匹配。

索引编号代表了加载宏在 Add-Ins 对话框的可用 Add-Ins 列表中的位置。以下示例显示了当前 PowerPoint 中加载的所有加载宏的名称。

For i = 1 To AddIns.Count
    If AddIns(i).Loaded Then MsgBox AddIns(i).Name
Next

说明

可以使用 Add 方法向可用加载宏列表中添加与 PowerPoint 相关的加载宏。注意，使用该方法并不会加载加载宏。如果要加载加载宏，请在使用 Add 方法后将加载宏的 Loaded 属性设为 True。可以单步执行这些动作，如以下示例所示（注意，Add 方法使用加载宏名称而不使用标题）。

AddIns.Add("generic.ppa").Loaded = True

使用 AddIns(index) 可返回一个对已加载的加载宏的引用，其中 index 表示加载宏的标题。以下示例将变量 presAddin 设置成标题为“my ppt tools”的加载宏，并将变量 myName 设置成该加载宏的名称。

Set presAddin = AddIns("my ppt tools")
With presAddin
    myName = .Name
End With