Message 1 of 6
How would I Explode an AutoCAD Table object?

Not applicable
07-14-2008
11:42 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
How would I Explode an AutoCAD Table object? I have created a sset of
tables, and wish to explode them into individual entities.
Any clues about how I should obtain this?
Thanks,
Dan
'code snippet
Dim Ent As AcadEntity
Dim oTable As AcadTable
Dim oSet As AcadSelectionSet
FilterType(0) = 0
FilterData(0) = "ACAD_TABLE"
Set oSet = ThisDrawing.SelectionSets.Add("DeleteTable")
oSet.Select acSelectionSetAll, , , FilterType, FilterData
For Each Ent In oSet
Set oTable = Ent
oTable.Explode 'obviously this will not work
Next
tables, and wish to explode them into individual entities.
Any clues about how I should obtain this?
Thanks,
Dan
'code snippet
Dim Ent As AcadEntity
Dim oTable As AcadTable
Dim oSet As AcadSelectionSet
FilterType(0) = 0
FilterData(0) = "ACAD_TABLE"
Set oSet = ThisDrawing.SelectionSets.Add("DeleteTable")
oSet.Select acSelectionSetAll, , , FilterType, FilterData
For Each Ent In oSet
Set oTable = Ent
oTable.Explode 'obviously this will not work
Next