VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

VBA-Begriff: ShapeNode-Objekt

Stellt die Geometrie und die Bearbeitungseigenschaften der Geometrie der Knoten in einem benutzerdefinierten Freihandobjekt dar. Knoten schließen die Scheitelpunkte zwischen den Abschnitten des Freihandobjekts und die Steuerpunkte der gekrümmten Abschnitte ein. Das ShapeNode-Objekt ist ein Element der ShapeNodes-Auflistung. Die ShapeNodes-Auflistung enthält alle Knoten eines Freihandobjekts.

Verwenden des ShapeNode-Objekts

Verwenden Sie Nodes(Index), wobei Index die Indexnummer des Knotens ist, um ein einzelnes ShapeNode-Objekt zurückzugeben. Falls es sich bei dem ersten Knoten der dritten Form in myDocument um einen Eckpunkt handelt, wird er im folgenden Beispiel zu einem Übergangspunkt gemacht. Damit das Beispiel funktioniert, muss es sich bei der dritten Form um ein Freihandobjekt handeln.

Set myDocument = Worksheets(1)
With myDocument.Shapes(3)
    If .Nodes(1).EditingType = msoEditingCorner Then
        .Nodes.SetEditingType 1, msoEditingSmooth
    End If
End With