升级版TQZB2014-6-19提取文字及其插入点10坐标提取到指定文件夹

寒潮大冬瓜

提取文字插入点坐标【测量坐标格式】
http://bbs.mjtd.com/forum.php?mo ... 0174&fromuid=418631
(出处: 明经CAD社区)

TQZB2014-6-19提取文字及其插入点10坐标提取到指定文件夹保存为office和wps通用的csv格式
考虑桩号需要加前缀加以识别，如灌注桩=G
=IFERROR(MID(B1,FIND("G",B1)+……B1))
;无法提前实现把excel公式写入lsp代码
通过excl公式再处理后，能把桩号重新排序→再回到CAD→于是桩号编制控制多段线又重新生成了！
文字其实有起始点10和对齐点11：
(setq lxyz (cdr (assoc 11 ept)));提取该文字的10端点坐标值11是文字对齐点
excel文件内通过桩号和对应坐标值加上特定代码合并后，直接复制到CAD界面Ctrl+v→顺利输入CAD内！
桩号及其对应坐标值及施工日期批量写入CAD对应桩位代码