Свойство гиперссылки. Parent (Publisher)Hyperlinks.Parent property (Publisher)

Возвращает объект, представляющий родительский объект указанного объекта.Returns an object that represents the parent object of the specified object. Например, для объекта TextFrame возвращает объект Shape , представляющий родительскую фигуру текстового фрейма.For example, for a TextFrame object, returns a Shape object representing the parent shape of the text frame. Только для чтения.Read-only.

СинтаксисSyntax

Expression. Родительский элементexpression.Parent

выражение: переменная, представляющая объект Hyperlinks.expression A variable that represents a Hyperlinks object.

ПримерExample

В этом примере показан доступ к родительскому объекту выбранной фигуры, а затем добавляется новая фигура и задается Заливка для новой фигуры.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

В этом примере возвращается родительский объект текстового фрейма, который является первой фигурой в активной публикации, а затем заполняет фигуру узором.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

Поддержка и обратная связьSupport and feedback

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.