---

Hallo,

folgender Code zum Erzeugen einer Linie in einem Sketch funktioniert sowohl in CATScript wie auch in VBScript. Unter VBA entsteht eine Fehlermeldung für die letzten beiden Zeilen.

        Dim point2D1
        point2D1 = factory2D1.CreatePoint(-15, 45)
        point2D1.ReportName = 3

        Dim point2D2
        point2D2 = axis2D1.GetItem("Origin")

        Dim line2D3
        line2D3 = factory2D1.CreateLine(0, 0, -15, 45)
        line2D3.ReportName = 4
        line2D3.Construction = True

        'Funktioniert in CATScript und VBScript aber nicht in VBA
        line2D3.StartPoint = point2D2
        line2D3.EndPoint = point2D1

Anscheinend wollen die Properties "StartPoint" und "EndPoint" in VBA nicht so recht. Allerdings benötige ich sie, um die Assoziativität zu anderen Linien herzustellen.
Ist dieses Problem bei Euch schon einmal aufgetaucht und könnt Ihr mir vielleicht einen Tipp geben, wie ich das lösen kann?

Bin für jede Hilfe dankbar!
Gruß, Alex

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP