想自己用VBA程序读取CAD里的明细表,然后写到EXCEL中去
我是用AcadSelectionSet的SelectOnScreen方法获取明细表的文本到选择集中,然后用AcadEntity的TextString属性取出文本内容。因为明细表格式是规定好的(每行7列),因此写EXCEL时候每7列就换行。
我现在遇到2个问题:
1、用户选择对象的时候,如果是全部框下来而不是逐个点取的话,读出来的明细表文本毫无顺序,没办法还原到EXCEL中了。
2、遇到表中某一格是空格的时候,程序没办法判断。
新手上路,还请多多指教! |