FirstChild Property
Returns a DiagramNode object representing the first diagram node in a collection of diagram nodes.
expression.FirstChild
*expression * Required. An expression that returns one of the objects in the Applies To list.
Example
The following example creates a new diagram and identifies the first child diagram node.
Sub FirstChildNodeHello() Dim dgnNode As DiagramNode Dim dgnFirst As DiagramNode Dim shpDiagram As Shape Dim intNodes As Integer Set shpDiagram = ActivePresentation.Slides(1).Shapes.AddDiagram _ (Type:=msoDiagramOrgChart, Left:=10, Top:=15, _ Width:=400, Height:=475) Set dg nNode = shpDiagram.DiagramNode.Children.AddNode For intNodes = 1 To 3 dg nNode.Children.AddNode Next intNodes Set dgnFirst = dg nNode.Children.FirstChild dgnFirst.Shape.TextFrame.TextRange.Text = "Here I am!" End Sub
Applies to | DiagramNodeChildren Collection