Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt ein DiagramNode-Objekt zurück, das den ersten untergeordneten Knoten eines übergeordneten Knotens darstellt. Schreibgeschützt.
Syntax
expression. FirstChild
Ausdruck: Erforderlich. Eine Variable, die ein XMLNode-Objekt darstellt.
Hinweise
Verwenden Sie die LastChild-Eigenschaft , um auf den letzten untergeordneten Knoten zuzugreifen. Verwenden Sie die Root-Eigenschaft , um auf den übergeordneten Knoten in einem Diagramm zuzugreifen.
Beispiel
In diesem Beispiel wird dem aktuellen Dokument ein Organigramm mit drei Knoten hinzugefügt. Anschließend werden Variablen der erste und der letzte untergeordnete Knoten zugewiesen.
Sub FirstChild()
Dim shpDiagram As Shape
Dim dgnRoot As DiagramNode
Dim dgnFirstChild As DiagramNode
Dim dgnLastChild As DiagramNode
Dim intCount As Integer
'Add organizational chart diagram to the current document
Set shpDiagram = ActiveDocument.Shapes.AddDiagram _
(Type:=msoDiagramOrgChart, Left:=10, _
Top:=15, Width:=400, Height:=475)
'Add the first node to the diagram
Set dgnRoot = shpDiagram.DiagramNode.Children.AddNode
'Add three child nodes
For intCount = 1 To 3
dgnRoot.Children.AddNode
Next intCount
'Assign the first and last child nodes to variables
Set dgnFirstChild = dgnRoot.Children.FirstChild
Set dgnLastChild = dgnRoot.Children.LastChild
End Sub
Siehe auch
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.