Hallo Dirk,
vielen Dank, das hat funktioniert in der Form
ThisDrawing.SendCommand "_draworder" & vbCr & insertionPoint(0) & "," & insertionPoint(1) & vbCr & vbCr & "u" & vbCr
Ich arbeite noch nicht lange mit VBA in AutoCad und der SendCommandBefehl ist bestimmt für einiges gut. Nur habe ich keine bessere Methode gefunden ein Objekt vorher zu markieren (nur über den Punkt insertionPoint).
Mit
Obj.Highlight (True)
wird es zwar gestrichelt dargestellt, aber keine blauen Vorauswahlpunkte.
Gruß Bp
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP