Question

全部显示

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