如何分解AutoCAD表格对象?
如何分解 AutoCAD 表对象? 我创建了一组表,并希望将它们分解为单个实体。
关于我应该如何获得这个的任何线索?
谢谢,
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 '显然这将不起作用
下一步
**** Hidden Message ***** 嗨,丹,这里有一个肮脏的方法,但似乎对我有效代码0]
~'J'~ 谢谢你的巧妙方法。我个人讨厌使用sendcommand做任何事情,但是我还没有找到通过VBA的方法。再次感谢。这将满足我的需要。 不客气
干杯
~'J'~
页:
[1]