[VBA程序]：如何将autocad中生成的明细表输出为excel?

wjx9694

或者其他数据形式?

长清

最初由 wjx9694 发布
[B]或者其他数据形式? [/B]

一般地看，ACAD里的明细表不是一个对象，它只不过是位置比较靠近的数字和线条，因此，编程实现是比较困难，但是可行的。数据横平竖直无规律，很多画图人员是随意再一个一个用线条组成的框里写文字，坐标很难排序，如果有缺项，排序时很难判断其位置。当然，这些问题都可以设置两个模糊的数值（精度）来控制，问题是数据分组和排序比较难。我曾经把表格输出到文本文件，因此，实现还是可能的，摸索一下吧。

mooney

我也试过把CAD中的文本输出到文本文件，但却很难说按表格的形式，请问斑竹可否把你的程序公开？
先多谢了！！

efan2000

其实，可以专门做一个图块，明细表的一行为一个块对象，在其中放置属性数据。
还有一种方法需要用到扩展数据或扩展记录等。

佐罗

能把CAD中的文本输出到文本文件,就能变成EXECL的文件.因为EXECL支持逗号分隔格式文本文件.只需要把文件后缀名取为.csv即可.试试吧,相信自己:)

灯火

主要是行列排序的算法，老的001论坛讨论过此问题，未果。

如果表格比较规矩，不妨用文字插入点坐标的Y、X值作为同行同列的判断标准，

行列问题解决了，输出到Excel比输出文本文件还简单。

zjbook

CDF  to open excel即可.

EMeiMonkey

很简单啊，通过模板文件，在模板文件中设置标题栏明细表等参数，注意这些参数在各个单位使用都是有规范的，然后扫描ACAD所有的文字对象，通过坐标定位就可以得到标题栏明细表数据然后通过ADO就可以输出到EXCEL中了。