Clase AddIn - complemento (Word VBA)
La clase AddIn representa un solo complemento, ya sea instalado o no está instalado. Para usar una variable de clase AddIn, primero debe ser instanciado, por ejemplo
Dim adi as AddIn
Set adi = AddIns(Index:=1)
For Each
A continuación, se muestra un ejemplo de cómo procesar los elementos AddIn en una colección.
Dim adi As AddIn
Dim iCount
For Each adi In AddIns
If adi.Compiled = True And adi.Installed = True Then
iCount = iCount + 1
End If
Next adi
MsgBox iCount & " WLL's are loaded"
Autoload
True si el complemento especificado se carga automáticamente al iniciar Word.
Dim booAutoload As Boolean
booAutoload = AddIns(1).Autoload
Compiled
True si el complemento especificado es una biblioteca de complemento de Word (WLL).
Dim booCompiled As Boolean
booCompiled = AddIns(1).Compiled
Delete
Elimina el complemento especificado.
AddIns(1).Delete
Index
Devuelve un valor de tipo Long que representa la posición de un elemento en una colección.
Dim As Variant
AddIns(1).Index
Installed
True si el complemento especificado está instalado (cargado).
Complementos desinstalados se incluyen en la colección AddIns.
Addins("Gallery.dot").Installed = False
Name
Devuelve el nombre de un complemento.
Dim strName As String
strName = AddIns(1).Name
Path
Devuelve la ubicación de un complemento instalado.
La ruta de acceso no incluye un carácter final, por ejemplo, "C:\MSOffice" o "https://MyServer".
If AddIns.Count >= 1 Then MsgBox AddIns(1).Path