Zeichnungsobjekte / shapes / linien
26.11.2004 09:01:32
Karsten
Eine Linienzeichnung in einem Worksheet aus Koordinaten erstellen. Bei Eingabe neuer Koordinaten soll der alte Linienzug gelöscht und ein neuer dargestellt werden.
Was habe ich bereits:
Die Linien werden gezeichnet und dargestellt:
ActiveSheet.Shapes.AddLine(X1, Y1, X2, Y2).Select
Problem:
Die vorhandenen Linien ansprechen und formatieren, bzw. löschen.
Habe in der Hilfe folgendes gefunden:
Set myDocument = Worksheets(1)
Set myRange = myDocument.Shapes.Range(Array("Big Star", _
"Little Star"))
Mit dieser Anweisung werden, nach meinem Verständnis, Zeichnungsobjekte Typ Sterne angesprochen.
Kann man diese Anweisung ändern, damit Sie Linien anspricht?
Oder kennt jemand eine bessere Vorgehensweise um die Linien zu löschen/formatieren?
Vielen Dank für die Mühe bereits vorab