Autoload 属性

       

如果该属性为 True,则在 Word 启动时,自动加载指定的加载项。位于 Word 程序文件夹的 Startup 子文件夹中的加载项可以自动加载。Boolean 类型,只读。

示例

此示例显示 Word 启动时自动加载的每一加载项的名称。

Dim addinLoop as AddIn
Dim blnFound as Boolean

blnFound = False

For Each addinLoop In AddIns
    With addinLoop
        If .Autoload = True Then 
            MsgBox .Name
            blnFound = True
        End If
    End With
Next addinLoop

If blnFound <> True Then _
    MsgBox "No add-ins were loaded automatically."

此示例判断名为“Gallery.dot”的加载项是否自动加载。

Dim addinLoop as AddIn

For Each addinLoop In AddIns
    If InStr(LCase$(addinLoop.Name), "gallery.dot") > 0 Then
        If addinLoop.Autoload = True Then Msgbox "Autoload"
    End If
Next addinLoop