MailMerge.Parent-Eigenschaft (Publisher)MailMerge.Parent Property (Publisher)

Gibt ein Objekt zurück, das das übergeordnete Objekt des angegebenen Objekts darstellt.Returns an object that represents the parent object of the specified object. Beispielsweise gibt für ein TextFrame -Objekt ein Shape -Objekt zurück, das die übergeordnete Form des Textrahmens darstellt.For example, for a TextFrame object, returns a Shape object representing the parent shape of the text frame. Schreibgeschützt.Read-only.

SyntaxSyntax

expression.expression. ParentParent

Ausdruck Eine Variable, die ein MailMerge -Objekt darstellt.expression A variable that represents a MailMerge object.

BeispielExample

Das folgende Beispiel greift auf das übergeordnete Objekt der ausgewählten Form zu, fügt dann eine neue Form hinzu und legt die Füllung für die neue Form fest.This example accesses the parent object of the selected shape, and then adds a new shape to it and sets the fill for the new shape.

Sub ParentObject() 
 Dim shp As Shape 
 Dim pg As Page 
 
 Set pg = Selection.ShapeRange(1).Parent 
 Set shp = pg.Shapes.AddShape(Type:=msoShape5pointStar, _ 
 Left:=72, Top:=72, Width:=72, Height:=72) 
 
 shp.Fill.ForeColor.RGB = RGB(Red:=180, Green:=180, Blue:=180) 
End Sub

Das folgende Beispiel gibt die übergeordnete Form eines Textrahmens zurück, der die erste Form in der aktiven Publikation ist, und füllt dann die Form mit einem Muster.This example returns the parent object of a text frame, which is the first shape in the active publication, and then fills the shape with a pattern.

Sub ParentShape() 
 Dim shpParent As Shape 
 Set shpParent = ActiveDocument.Pages(1).Shapes(1).TextFrame.Parent 
 shpParent.Fill.Patterned Pattern:=msoPatternSphere 
End Sub