danxingpen 发表于 2013-9-22 11:13 static/image/common/back.gif
我说的是你的做成块的图，，，，你这个图还是一楼的，根本没有变。。。。。。。。。。
没有理解。
您是否说，分别将名字层全部做成一个块，编号层做成一个块，面积层做成一个块？
那样新增加的不是又要重新做成块，那样是否方便？
我理解成每个图形就是一个小单元，否则，怎样对应呢？
比如说：编号142，名字董伟平，面积0.1811亩，怎样对应起来？
请指教。
谢谢！
461045462 发表于 2013-9-19 13:55 static/image/common/back.gif
谢谢您的关注，输出的表格不能分类排序，后面的查找比较难。
谢谢！
祝中秋节快乐！
将编号 姓名 面积 分别建图层，然后用上述方法试试。
你测试一下，te命令的时候要保证dikuaibianhao.dwg在你的cad的搜索路径下面。你的原件我已经用te命令做过的效果。tt就是输出了！
本帖最后由 wxytiger 于 2013-9-23 17:32 编辑
提供你一个思路：
你的主要需求是
（1）给每一块地编号，标记土地所有人，计算每一块土地面积并标注。
（2）将以上统计数据形成表格，或输出至excel。
编制程序思路可以如下：
（1）定义一个带属性块A，块内包含三个属性，分别是土地编号，土地所有人，土地面积。
（2）每块土地区域内插入块A（俗称块A的参照，或叫块A的实例)，然后分别填写块属性。
（3）框选所有块A的参照。
（4）遍历选择集，提取每一个块参照的属性值，形成表(list)
（5）将表(list)输出至excel或txt文件
你的问题是原始数据的相关关系没有考虑清楚，针对同一地块的三个数据没有形成一组相关数据，导致多组数据无法批量处理。
至于分成多个图层，其实是没必要的。
楼上的说法是正确的，只是你没有理解清楚。
本帖最后由 461045462 于 2013-9-23 21:13 编辑
wxytiger 发表于 2013-9-23 17:26 static/image/common/back.gif
提供你一个思路：
你的主要需求是
（1）给每一块地编号，标记土地所有人，计算每一块土地面积并标注。
谢谢您的关注！
是的，楼上说的没有领会到。
再根据楼上提供的试试、学习学习。
谢谢！
香田里浪人 发表于 2013-9-22 19:15 static/image/common/back.gif
将编号 姓名 面积 分别建图层，然后用上述方法试试。
谢谢您！
我将图形分别建立了图层，试了试，读取数据时或许没有规则。
不能按要求读取。
我好好看看学习领会再试试。
谢谢！
本帖最后由 461045462 于 2013-9-24 00:08 编辑
xyp1964 发表于 2013-9-23 22:27 http://bbs.mjtd.com/static/image/common/back.gif
院长您好：
下载试了试，操作后，Excel表格打开了，如果图形中只有3个元素，可以一次性写入：如果图形中或许还有其它的元素（多一个层的东西），读写就有误，表格是空的。
请指教。
谢谢！
程序或许给了限制
(= (sslength ss1) 3)
谢谢！
danxingpen 发表于 2013-9-23 15:25 static/image/common/back.gif
你测试一下，te命令的时候要保证dikuaibianhao.dwg在你的cad的搜索路径下面。你的原件我已经用te命令做过的 ...
谢谢您的程序！
转存入的方法是对的，值得好好领会学习。
程序面积计算有些误，另外觉得一个块，修改或许有些不便。因为每天测绘后，当天需要生成表格，有时图形会重叠，需要修改。
块分解后数据发生变化，或许需要先备份；如果不是一个块，可以将其中一个层当时转换为另外一个层，也就是说，作一个记号，知道图面上哪些已经编辑好表格。
谢谢您！