Returning an Object from a Collection (Excel)

La propriété Item d’une collection renvoie un seul objet à partir de cette collection. L’exemple suivant définit la firstBook variable sur un objet Workbook qui représente le premier classeur de la collection Workbooks .

Set FirstBook = Workbooks.Item(1)

La propriété Item constitue la propriété par défaut pour la plupart des collections. Vous pouvez donc écrire la même instruction de manière plus concise en ne spécifiant pas le mot clé Item.

Set FirstBook = Workbooks(1)

Pour plus d'informations sur une collection spécifique, consultez la rubrique d'aide correspondante ou la propriété Item de la collection.

Objets nommés

Bien qu'il soit en principe possible de spécifier un entier avec la propriété Item, il peut être plus pratique de renvoyer un objet par nom. Avant de pouvoir utiliser un nom avec la propriété Item, vous devez nommer l'objet. Cela est généralement effectué en définissant la propriété Name de l'objet. L'exemple suivant montre comment créer une feuille de calcul nommée dans le classeur actif, puis faire référence à la feuille de calcul par ce nom.

ActiveWorkbook.Worksheets.Add.Name = "A New Sheet" 
With Worksheets("A New Sheet") 
 .Range("A5:A10").Formula = "=RAND()" 
End With

Valeurs d'index prédéfinies

Certaines collections ont des valeurs d’index prédéfinies que vous pouvez utiliser pour renvoyer des objets uniques. Chaque valeur d'index prédéfinie est représentée par une constante. Par exemple, vous spécifiez une constante xlBordersIndex avec la propriété Item de la collection Borders pour renvoyer une seule bordure.

L'exemple suivant montre comment définir une bordure inférieure double pour les cellules A1:G1 de la feuille Sheet1.

Worksheets("Sheet1").Range("A1:A1"). _ 
 Borders.Item(xlEdgeBottom).LineStyle = xlDouble

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.