Classe AddIns - coleção AddIns (Excel VBA)
Uma coleção de objetos AddIn que representa todos os suplementos disponíveis para o Microsoft Excel, independentemente de estarem ou não instalados. Para usar uma variável de classe AddIns, ela primeiro precisa ser instanciada por exemplo
Dim ais as AddIns
Set ais = AddIns
For Each
Aqui está um exemplo de processamento dos itens AddIns em uma coleção.
Dim adi As AddIn
For Each adi In AddIns
Next adi
Add
Adiciona um novo arquivo de suplemento à lista de suplementos. retorna um objeto AddIn .
Este método não instala o novo suplemento. Você deve definir a propriedade installed para instalar o suplemento.
Dim strFilename As String: strFilename =
Dim adi As AddIn
Set adi = AddIns.Add(Filename:=strFilename)
Arguments
O seguinte argumento é necessário
Filename (String) - O nome do arquivo que contém o suplemento ou o ProgID do suplemento de automação que você deseja adicionar à lista no Gerenciador de suplementos de um.
Optional arguments
The following argument is optional
CopyFile (Boolean) - Ignorado se o arquivo de suplemento estiver em um disco rígido. True para copiar o suplemento para o seu disco rígido, se o suplemento estiver em uma mídia removível (como um CD). False para que o suplemento permaneça na mídia removível. Se este argumento for omitido, o Microsoft Excel exibirá uma caixa de diálogo e pedirá que você escolha.
Count
Retorna um valor Long que representa o número de objetos na coleção.
Dim lngCount As Long
lngCount = AddIns.Count
Item
Retorna um único objeto de uma coleção.
Item (Index)
Index: O nome ou número de índice do objeto.
Dim adiItem As AddIn
Set adiItem = AddIns(Index:="Analysis ToolPak")