cadtoexcel

yjr111

前几天一直有朋友在讨论cad表格导出的问题，自己也有兴趣试一试，数据是基本正确输出了，无奈水平有限，输出到excel合并不知怎么操作，有待下一步学习后完善。。。先发个fas请大家伙测试一下看看相关帖子http://bbs.mjtd.com/thread-93470-1-1.html

**2012-5-12**********************************************
1、修正了一个BUG
2、改进了输出方法（终于成功使用明总N年前就提供的函数）
3、表格输出后自动调整宽度。。。
一楼更新，请大伙继续测试！
*****************2012-5-14***********
这段时间工作较忙，合并问题一时也还不能解决，先奉上这一阶段的源码，请大伙拍砖！
;|思路：
1、取得表格范围直线，判断横表格线还是竖表格线

2、根据取得的表格线点表情况进行消除重复的表格线 即同一行多根或同一列多根表格线只计算一次，取得行数和列数

3、根据消重后的行列取得虚拟的每个单元格四个点，若 (not(ssget "wp" x '((0 . "*TEXT")))),则进行 (ssget "cp" x '((0 . "*TEXT"))),若再无，则为空字符串

4、若一个单元格有多个字符串，合并取得的每个单元格字符串

5、输出EXCEL



********************2012-7-26更新**************************

xiaxiang

研究了一下，增加了内外框线
测试通过，免币下载，但是下完之后请为楼主加分，不然一律作扣分处理

flytoday

这贴特火。。。这是我论坛全搜索过最好的表格转EXL。。。没见过更好滴呢
再顶上哈

apoul

yjr111 发表于 2014-9-20 09:07
以工具的形式发布，算是嘚瑟一下吧。http://bbs.mjtd.com/apptools.php

(c2e)表格输出到EXCEL.vlx 老师您好，这个软件很好用，可以把块表格转成excel，您能说下怎么实现的吗？块表格转成excel

flytoday

严哥很给力。。

flytoday

严哥好象这张表格。。有的会两行并到一行中去了哦。。。。

功夫佬

顶支持原代码

CTC

命令:
CADTOEXCEL
请框选要导出EXCEL的表格
请框选要导出EXCEL的表格; 错误: 参数类型错误: lselsetp nil

对于表格是一个块的不行,好像要炸开才导出数据.
http://bbs.mjtd.com/thread-93429-1-1.html    7楼的表格好像就不行了.

yjr111

flytoday 发表于 2012-5-10 17:44
严哥好象这张表格。。有的会两行并到一行中去了哦。。。。

已经修复此问题，一楼已更新

wowan1314

这个牛，flytoday的表格不是一般复杂啊。   希望能有幸学习楼主的源码。

xiaxiang

不错啊，以前见过C++的类似程序。。。

langjs

好象没提取到数据

wowan1314

（cad2004）
命令: cadtoexcel

请框选要导出EXCEL的表格
请框选要导出EXCEL的表格参数类型错误: VLA-OBJECT nil

而且在命令的提示：（请框选要导出的EX的表格）为乱码。但是回头看文本窗口又是正确的。