Sub ObjectName_example()
Dim ent As AcadEntity
For Each ent In ThisDrawing.ModelSpace
MsgBox "The ObjectName is: " & ent.ObjectName
Next
End Sub
| Bricscad™ is commercialized by Bricsys NV. Bricsys NV and Vondle NV are fully owned subsidiaries of Menhirs NV. © 2001- Menhirs NV - All rights reserved. |