Zurückgeben von Objekten aus Auflistungen

Die Item -Methode gibt ein einzelnes Objekt aus einer Auflistung zurück. Im folgenden Beispiel wird die firstPres-Variable auf ein Presentation-Objekt festgelegt, das präsentations-1-Variable auf ein Presentation-Objekt darstellt, das Präsentation 1 darstellt.

Set firstPres = Presentations.Item(1)

Bei den meisten Auflistungen ist die Item -Methode die Standardmethode der Auflistung. Sie können also die gleiche Anweisung auch ohne Angabe des Schlüsselworts Item formulieren:

Set firstPres = Presentations(1)

Weitere Informationen zu einer bestimmten Auflistung finden Sie im Hilfethema für diese Auflistung oder für die Item -Methode der Auflistung.

Benannte Objekte

Obwohl Sie in der Regel einen ganzzahligen Wert mithilfe der Item-Methode angeben können, ist es möglicherweise bequemer, ein Objekt anhand des Namens zurückzugeben. Viele Objekte erhalten automatisch generierte Namen, wenn sie erstellt werden. Die erste Folie, die Sie erstellen, erhält beispielsweise automatisch den Namen "Folie1". Wenn die ersten beiden Formen, die Sie erstellen, ein Rechteck und ein Oval sind, sind die Standardnamen "Rechteck 1" und "Oval 2". Möglicherweise möchten Sie einem Objekt einen aussagekräftigeren Namen geben, damit später leichter darauf verwiesen werden kann. Dies erfolgt meistens durch Festlegen der Name-Eigenschaft des Objekts. Im folgenden Beispiel wird ein aussagekräftiger Name für eine Folie festgelegt, während sie hinzugefügt wird. Sie können dann den Namen anstelle der Indexnummer verwenden, um auf die Folie zu verweisen.

ActivePresentation.Slides.Add(1, 1).Name = "Home Page Slide"
With ActivePresentation.Slides("Home Page Slide")
    .FollowMasterBackground = False
    .Background.Fill.PresetGradient _
        msoGradientDiagonalDown, 1, msoGradientBrass
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 PpTextStyleType-Konstante mit der Item-Methode der TextStyles-Auflistung an, um eine einzelne Textart zurückzugeben.

Im folgenden Beispiel wird das Ränderformat für die Fläche von Folien der aktiven Präsentation festgelegt.

With ActivePresentation.SlideMaster _
        .TextStyles(ppBodyStyle).TextFrame
    .MarginBottom = 50
    .MarginLeft = 50
    .MarginRight = 50
    .MarginTop = 50
End With

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.