Selection.ShapeRange-Eigenschaft (Publisher)
Gibt eine ShapeRange -Auflistung, die alle Shape -Objekte im angegebenen Bereich oder der Markierung darstellt. Der Formenbereich kann Zeichnungen, Formen, Bilder, OLE-Objekte, ActiveX-Steuerelemente, Textobjekte und Legenden enthalten.
Syntax
Ausdruck. Shaperange
Ausdruck Eine Variable, die ein Selection-Objekt darstellt.
Rückgabewert
ShapeRange
Beispiel
Das folgende Beispiel legt das Füllmuster für alle Formen in der Auswahl fest. In diesem Beispiel wird davon ausgegangen, dass mindestens eine Form in der aktiven Publikation ausgewählt ist.
Sub ChangeFillForShapeRange()
Selection.ShapeRange.Fill.Patterned Pattern:=msoPattern20Percent
End Sub
Das folgende Beispiel wendet auf alle Formen in der Auswahl eine Schatten- und Füllungsformatierung an. In diesem Beispiel wird davon ausgegangen, dass mindestens eine Form in der aktiven Publikation ausgewählt ist.
Sub SetShadowForSelectedShapes()
With Selection.ShapeRange
.Shadow.Type = msoShadow6
.Fill.Patterned Pattern:=msoPatternDottedDiamond
End With
End Sub
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.