AddIn 对象

         
Application
AddIns (AddIn)

代表单个加载项,不论该加载项是否已加载。AddIn 对象是 AddIns 集合中的一个元素。AddIns 集合包含 Word 中所有的有效加载项,不论其当前是否已加载。AddIns 集合包含在“工具”菜单的“模板和加载项”对话框内所显示的共用模板或 Word 加载项库 (WLL) 中。

使用 AddIn 对象

AddIns(index) 可返回单个 AddIn 对象,其中 index 是指加载项的名称或索引序号。名称的拼写必须与“模板和加载项”对话框内所显示的完全匹配(大小写不必匹配)。下面的示例将以共用模板形式加载 Letter.dot。

AddIns("Letter.dot").Installed = True

索引序号代表加载项在“模板和加载项”对话框内的加载项列表中所处的位置。下列指令显示第一个有效加载项的路径。

If Addins.Count >= 1 Then MsgBox Addins(1).Path

下列示例在活动文档开始处创建一个加载项列表。该列表包含了每一个有效加载项的名称、路径和加载状态。

With ActiveDocument.Range(Start:=0, End:=0)
    .InsertAfter "Name" & vbTab & "Path" & vbTab & "Installed"
    .InsertParagraphAfter
    For Each oAddIn In AddIns
        .InsertAfter oAddIn.Name & vbTab & oAddIn.Path & vbTab _
            & oAddIn.Installed
        .InsertParagraphAfter
    Next oAddIn
    .ConvertToTable
End With

Add 方法可在有效加载项列表中添加加载项,并可通过 Install 参数(可选)将其加载。

AddIns.Add FileName:="C:\Templates\Other\Letter.dot", Install:=True

Installed 属性,可加载有效加载项列表中的加载项。

AddIns("Letter.dot").Installed = True

注意   用 Compiled 属性可判断 AddIn 对象是模板还是一个 WLL。