---

Hallo,

wie kann ich aus einer Zeichnung beispielsweise alle grünen Punkte auslesen und die Koordinaten in Variablen abspeichern?
Mit Visual Lisp ist das ja kein Problem, aber wie bekomme ich das mit VBA hin?
In der Benutzerdokumentation finde ich überhaupt nichts darüber.
Es soll ja ein Buch über die VBA Programmierung rauskommen (Karsten Dummer) aber scheinbar ist das noch nicht verfügbar.

Gruß Gerd3

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

---

Code:

---

    Set objSelSet = ThisDrawing.PickfirstSelectionSet
    objSelSet.Clear
    intType(0) = 0
    varData(0) = "POINT"
    intType(1) = 62
    varData(1) = 3
   
    objSelSet.Select acSelectionSetAll, FilterType:=intType, FilterData:=varData

---

------------------
Roland

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

---

Hallo Roland,

besten Dank für Deine Antwort !

Das Programm läuft soweit, aber wie komme ich an die Koordinaten der gewählten Punke ran ?
Bisher habe ich immer in Visual Lisp programmiert, mit VBA habe ich ein Programm geschrieben, das über die R232 Schnittstelle Daten von einen Meßgerät einliest.
Das hat auch ganz gut geklappt, aber da habe ich nur die üblichen Visual Basic Befehle benötigt und lediglich die Meßpunkte auf den Bildschirm gezeichnet.
Jetzt wo es darum geht, Objekte zu wählen und zu verändern stelle ich mich wahrscheinlich echt blöd an.

Gruß Gerd3

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

---

So auf die Schnelle würde ich sagen Punkt.Coordinates

------------------
Roland

[Diese Nachricht wurde von RoSiNiNo am 14. Oktober 2003 editiert.]

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