PowerPoint VBA教程:FirstChild属性

返回 DiagramNode对象,该对象代表图示节点集合中的第一个图示节点。

expression.FirstChild

expression  必选。该表达式返回“应用于”列表中的对象之一。

VBA示例

以下示例新建一个图示并且标识第一个图示子节点。

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

上页:PowerPoint VBA教程:Fill属性 下页:PowerPoint VBA教程:FirstMargin属性

PowerPoint VBA教程:FirstChild属性

PowerPoint VBA教程:FirstMargin属性 PowerPoint VBA教程:FirstSlideNumber属性
PowerPoint VBA教程:FitToPage属性 PowerPoint VBA教程:FolderSuffix属性
PowerPoint VBA教程:FollowColors属性 PowerPoint VBA教程:FollowMasterBackground属性
PowerPoint VBA教程:Font属性 PowerPoint VBA教程:FontBold属性
PowerPoint VBA教程:FontItalic属性 PowerPoint VBA教程:FontName属性
PowerPoint VBA教程:Fonts属性 PowerPoint VBA教程:FontSize属性
PowerPoint VBA教程:Footer属性 PowerPoint VBA教程:ForeColor属性
PowerPoint VBA教程:Format属性 PowerPoint VBA教程:Formula属性
PowerPoint VBA教程:FrameColors属性 PowerPoint VBA教程:FrameSlides属性
PowerPoint VBA教程:From属性 PowerPoint VBA教程:FromX属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号