iCAx开思工具箱

标题: 超快CAD图形→Excl方法 [打印本页]

作者: 669423907 时间: 2011-4-28 22:24
标题: 超快CAD图形→Excl方法

删除未选择对象（论坛上大师的）
(defun c:sd()
(princ"\n选择要保留对象:")
(setq SS(ssget)
ss1(ssget"X"))
(command"erase"ss1"r"ss""zoom _e))
线宽关（自己拼的）
(defun C:vb()(command"lwdisplay""y")(princ))
全屏
zoom _e
全选
ai_selall
复制
copyclip
退回5步
_.undo 5

作者: ps039190 时间: 2012-4-3 20:40
谢谢分享。。。。。

作者: a8012024 时间: 2012-11-16 08:40
感謝您~

作者: judyyai 时间: 2012-11-25 14:29
不好意思请问楼主～
这程式该怎麽使？

我已经载入至autocad
指令输入：sd
选择图形

指令: sd
選擇要保留對象:
選取物件: 指定對角點: 找到 2 個
選取物件:
erase
選取物件: 找到 2 個

選取物件: r
移除物件: 找到 2 個， 2 已移除，共 0

移除物件:
指令:
指令:
指令: nil

接下来？

作者: ymj02042006 时间: 2014-5-7 11:20
这个还不错

作者: 我是来玩的 时间: 2014-5-10 17:28
牛人

作者: phoenixyred 时间: 2014-7-5 08:10
谢谢了下来学习

作者: yeyun555 时间: 2014-7-10 08:37
牛人啊，膜拜

作者: 阳光伴你左右 时间: 2014-7-20 15:05

好东西，拿

作者: lxg415 时间: 2014-10-25 09:12

好东西！！！！！

作者: kaizhiwangwyh 时间: 2015-1-11 14:59
好东西啊，怎么弄的啊

作者: home1415 时间: 2015-9-5 10:12
学习一下学习一下学习一下

作者: yanguo521 时间: 2020-4-11 07:12
学习了真好

欢迎光临 iCAx开思工具箱 (https://t.icax.org/)