Returning an Object from a Collection (Excel)

Die Item-Eigenschaft einer Auflistung gibt ein einzelnes Objekt aus dieser Auflistung zurück. Im folgenden Beispiel wird die firstBook Variable auf ein Workbook-Objekt festgelegt, das die erste Arbeitsmappe in der Workbooks-Auflistung darstellt.

Set FirstBook = Workbooks.Item(1)

Die Item-Eigenschaft ist die Standardeigenschaft für die meisten Auflistungen. Deshalb können Sie dieselbe Anweisung durch Weglassen des Schlüsselwortes Item verkürzen.

Set FirstBook = Workbooks(1)

Weitere Informationen über eine bestimmte Auflistung finden Sie unter dem Hilfethema für die betreffende Auflistung oder unter der Item-Eigenschaft für die Auflistung.

Benannte Objekte

In der Regel können Sie bei der Item-Eigenschaft zwar einen Ganzzahlwert angeben, es ist jedoch eventuell einfacher, ein Objekt mithilfe seines Namens zurückzugeben. Sie müssen das Objekt zuerst benennen, bevor Sie bei der Item-Eigenschaft mit einem Namen arbeiten können. Dies erfolgt meistens durch Festlegen der Name-Eigenschaft des Objekts. Im folgenden Beispiel wird ein benanntes Arbeitsblatt in der aktiven Arbeitsmappe erstellt, und anschließend wird das Arbeitsblatt mithilfe seines Namens angegeben.

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

Vordefinierte Indexwerte

Einige Auflistungen haben vordefinierte Indexwerte, mit deren Hilfe Sie einzelne Objekte zurückgeben können. Jeder vordefinierte Indexwert wird durch eine Konstante dargestellt. Beispielsweise geben Sie eine xlBordersIndex-Konstante mit der Item-Eigenschaft der Borders-Auflistung an, um einen einzelnen Rahmen zurückzugeben.

Im folgenden Beispiel wird für den unteren Rahmen des Zellbereichs "A1:G1" in Sheet1 eine doppelte Linie festgelegt.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.