Word VBA教程:Autoload属性

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

VBA示例

此示例显示 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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号