Clase AddIns - colección de objetos AddIn (Word VBA)
Una colección de objetos AddIn que representa todos los complementos disponibles de Word, independientemente de si están o no actualmente cargados. Para usar una variable de clase AddIns, primero debe ser instanciado, por ejemplo
Dim ais as AddIns
Set ais = AddIns
For Each
A continuación, se muestra un ejemplo de cómo procesar los elementos AddIns en una colección.
Dim adi As AddIn
For Each adi In AddIns
Next adi
Add
Devuelve un objeto AddIn que representa un complemento agregado a la lista de complementos disponibles.
Utilice la propiedad Installed de un complemento para comprobar si ya está instalado.
Sub AddTemplate()
' For this example to work correctly, verify that the
' path is correct and the file exists.
AddIns.Add FileName:="C:\Program Files\Microsoft Office" _
& "\Templates\Letters & Faxes\MyFax.dot", Install:=True
End Sub
Arguments
Un argumento con nombre
FileName (String) - La ruta de acceso de la plantilla o WLL.
Optional arguments
Los siguientes argumentos son opcionales
Install (Boolean) - True para instalar el complemento.
Count
Devuelve el número de objetos AddIn de la colección AddIns .
Dim lngCount As Long
lngCount = AddIns.Count
Item
Devuelve un objeto individual de una colección.
Item (Index)
Index: El complemento individual que se va a devolver.
Dim adi As AddIn
Set adi = AddIns(Index:=1)
Unload
Descarga todos los complementos cargados y, dependiendo del valor del argumento RemoveFromList , los quita de la colección AddIns .
Para descargar una sola plantilla o una biblioteca WLL, establezca la propiedad installed del objeto AddIn en false.
Unload (RemoveFromList)
RemoveFromList: True para quitar los complementos descargados de la colección AddIns (los nombres se quitan desde el cuadro de diálogo Plantillas y complementos).
If AddIns.Count > 0 Then AddIns.UnLoad RemoveFromList:=False