Objet AddIn (Excel)

  • Article

Cet objet représente une macro complémentaire, installée ou non.

Remarques

L'objet AddIn est un membre de la collection AddIns. La collection AddIns contient une liste de tous les compléments disponibles dans Microsoft Excel, qu’ils soient installés ou non. Cette liste correspond à celle que vous voyez dans la boîte de dialogue Macro complémentaire.

Exemple

UtilisezAddIns (index), oùindex est le nom du complément ou le numéro d'index, pour renvoyer un seul objetAddIn. L’exemple suivant installe le complément utilitaire d’analyse.

AddIns("analysis toolpak").Installed = True

Ne confondez pas le titre de complément qui se trouve dans la boîte de dialogueCompléments avec le nom du complément, qui correspond au nom de fichier du complément. Vous devez orthographier le titre du complément exactement comme il est écrit dans la boîte de dialogueCompléments, mais la mise en majuscule n’a pas d’importance.

Le numéro d’index représente la position du complément dans la zoneMacros complémentaires disponibles dans la boîte de dialogue.Compléments. L’exemple suivant crée une liste qui contient les propriétés spécifiées des compléments disponibles.

With Worksheets("sheet1") 
 .Rows(1).Font.Bold = True 
 .Range("a1:d1").Value = _ 
 Array("Name", "Full Name", "Title", "Installed") 
 For i = 1 To AddIns.Count 
 .Cells(i + 1, 1) = AddIns(i).Name 
 .Cells(i + 1, 2) = AddIns(i).FullName 
 .Cells(i + 1, 3) = AddIns(i).Title 
 .Cells(i + 1, 4) = AddIns(i).Installed 
 Next 
 .Range("a1").CurrentRegion.Columns.AutoFit 
End With

La méthode Ajouter ajoute un complément à la liste des compléments disponibles mais n’installe pas le complément. Définissez la propriété Installé du complément à Vrai pour installer le complément.

Afin d'installer une macro complémentaire qui ne figure pas dans la liste, vous devez d'abord utiliser la méthode Add puis définir la propriété Installed. Cela peut être effectué en une seule étape comme dans l'exemple suivant (notez l'utilisation du nom de la macro complémentaire et non du titre avec la méthode Add ).

AddIns.Add("generic.xll").Installed = True

Utilisez Workbooks (index), où index est le nom du fichier de complément (et non le titre) pour renvoyer une référence au classeur correspondant à un complément chargé. Vous devez utiliser le nom du fichier, car les compléments chargés n’apparaissent normalement pas dans la collectionClasseurs. Cet exemple définit la variablewb au classeur Mamacro.xla.

Set wb = Workbooks("myaddin.xla")

L'exemple suivant montre comment affecter à la variable wb le classeur correspondant à la macro complémentaire Utilitaire d'analyse.

Set wb = Workbooks(AddIns("analysis toolpak").Name)

Si la propriété Installed renvoie la valeur True, mais que les appels aux fonctions du complément échouent toujours, le complément peut ne pas être chargé. En effet, l’objetComplément représente l’existence et état installé du complément, mais ne représente pas le contenu réel du classeur complément. Pour vous assurer qu’un complément installé est chargé, vous devez ouvrir le classeur complément.

L’exemple suivant ouvre le classeur pour le complément, nommé « Mon complément » si le complément n’est pas déjà présent dans la collection Classeurs.

On Error Resume Next ' turn off error checking 
Set wbMyAddin = Workbooks(AddIns("My Addin").Name) 
lastError = Err 
On Error Goto 0 ' restore error checking 
If lastError <> 0 Then 
 ' the add-in workbook isn't currently open. Manually open it. 
 Set wbMyAddin = Workbooks.Open(AddIns("My Addin").FullName) 
End If

Propriétés

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.