Método ShapeNodes.Insert (PowerPoint)

Inserta un segmento nuevo a continuación del nodo especificado de la forma libre.

Sintaxis

expresión. Insert (Index, SegmentType, EditingType, X1, Y1, X2, Y2, X3, Y3)

Expresión Variable que representa un objeto ShapeNodes .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Index	Obligatorio	Long	Nodo después del cual se va a insertar el nodo nuevo.
SegmentType	Obligatorio	MsoSegmentType	Tipo de segmento que se va a agregar.
EditingType	Obligatorio	MsoEditingType	Propiedad de edición del vértice.
X1	Obligatorio	Single	Si el parámetro EditingType del nuevo segmento es msoEditingAuto, este argumento especifica la distancia horizontal (en puntos) desde la esquina superior izquierda del documento hasta el extremo final del nuevo segmento. Si el parámetro EditingType del nuevo nodo es msoEditingCorner, este argumento especifica la distancia horizontal (en puntos) desde la esquina superior izquierda del documento hasta el primer punto de control para el nuevo segmento.
Y1	Obligatorio	Single	Si el parámetro EditingType del nuevo segmento es msoEditingAuto, este argumento especifica la distancia vertical (en puntos) desde la esquina superior izquierda del documento hasta el extremo final del nuevo segmento. Si el parámetro EditingType del nuevo nodo es msoEditingCorner, este argumento especifica la distancia vertical (en puntos) desde la esquina superior izquierda del documento hasta el primer punto de control para el nuevo segmento.
X2	Opcional	Single	Si el parámetro EditingType del nuevo segmento es msoEditingCorner, este argumento especifica la distancia horizontal (en puntos) desde la esquina superior izquierda del documento hasta el segundo punto de control para el nuevo segmento. Si el parámetro EditingType del nuevo segmento es msoEditingAuto, no especifique un valor para este argumento.
Y2	Opcional	Single	Si el parámetro EditingType del nuevo segmento es msoEditingCorner, este argumento especifica la distancia vertical (en puntos) desde la esquina superior izquierda del documento hasta el segundo punto de control para el nuevo segmento. Si el parámetro EditingType del nuevo segmento es msoEditingAuto, no especifique un valor para este argumento.
X3	Opcional	Single	Si el parámetro EditingType del nuevo segmento es msoEditingCorner, este argumento especifica la distancia horizontal (en puntos) desde la esquina superior izquierda del documento hasta el extremo final del nuevo segmento. Si el parámetro EditingType del nuevo segmento es msoEditingAuto, no especifique un valor para este argumento.
Y3	Opcional	Single	Si el parámetro EditingType del nuevo segmento es msoEditingCorner, este argumento especifica la distancia vertical (en puntos) desde la esquina superior izquierda del documento hasta el extremo final del nuevo segmento. Si el parámetro EditingType del nuevo segmento es msoEditingAuto, no especifique un valor para este argumento.

Comentarios

El valor del parámetro SegmentType puede ser una de estas constantes MsoSegmentType .

msoSegmentCurve
msoSegmentLine

El valor del parámetro EditingType puede ser una de estas constantes MsoEditingType .

Msoeditingauto
Msoeditingcorner

Ejemplo:

En este ejemplo se agrega un nodo suave con un segmento curvo después del nodo cuatro de la forma tres de myDocument. La forma tres debe ser un dibujo de forma libre con, al menos, cuatro nodos.

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes(3).Nodes
    .Insert Index:=4, SegmentType:=msoSegmentCurve, _
        EditingType:=msoEditingSmooth, X1:=210, Y1:=100
End With

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.