找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 5012|回复: 38

[原创]:CAD中多个不同的属性快的属性写入EXCEL表中的不同表单中的程序!

[复制链接]
发表于 2003-2-28 13:38:49 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
仅以此:祝晓东生日快乐!(本应该是昨天贴的。)
程序的功能:将CAD中带属性的不同名的块,将其属性值写入EXCEL表单中,表单的名称同所插入的块名相同,本程序为共享程序,如果每张表单中需要写的属性值小于300个,将是在正常时间内完成(很快)如果所转的超出其限制,请在你有时间的情况下使用:)。多出的部分您是要付时间给我的!(一个好几秒)。
注:如果你的行数不超过30行上,上述限制将不会发生!
附件中包括三个文件:1、hww_block_excel.vlx为主程序。2、hww属性.DWG为一个图形文件,里面包括了二个不同的属性块。3、hww-attdef.xls为hww属性.dwg所转成的EXCEL表。它会与所要转的图形文件在同一目录下!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
 楼主| 发表于 2003-2-28 14:46:48 | 显示全部楼层
表中有新增的二个表单。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-2-28 14:47:57 | 显示全部楼层
这是另一个
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-2-28 14:50:55 | 显示全部楼层
这是原始的dwg文件
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-2-28 15:40:53 | 显示全部楼层
小荷才露尖尖角,你的东东终于出来了。好事做到底,做个使用演示吧。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-3-6 18:07:27 | 显示全部楼层
看来autolisp真是个好东西,我是个新手,怎么入手阿?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-3-8 18:38:47 | 显示全部楼层
程序较好,不知能否自已定制,
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-3-10 12:29:36 | 显示全部楼层
程序执行完后,excel总是还在执行中,并没有清除,
是否有方法完全清除excel。由于没有清除excel,
程序多执行几次将会把内存用尽,终至内存不足。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-3-11 09:13:37 | 显示全部楼层
最初由 LUCAS 发布
[B]程序执行完后,excel总是还在执行中,并没有清除,
是否有方法完全清除excel。由于没有清除excel,
程序多执行几次将会把内存用尽,终至内存不足。 [/B]


LUCAS 你好改过了,现在不会出问题了!退出了CAD就释放了EXCEL,在CAD中只有一个EXCEL在运行中:)谢您以前对我的帮助!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-3-12 08:20:08 | 显示全部楼层
"在CAD中只有一个EXCEL在运行中"
這个EXCEL沒法清除嗎???
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-3-12 15:54:25 | 显示全部楼层
最初由 LUCAS 发布
[B]"在CAD中只有一个EXCEL在运行中"
這个EXCEL沒法清除嗎??? [/B]

CAD如果在运行时是没有办法清除的,如果你想尽快清出EXCEL占用的内存空间,你可以退出运行的CAD程序,EXCEL所占用的内存就释放出来了,然后再运行CAD程序。我自己就是做到这:)这点VLISP没有VBA好。再说现在计算的内存都很大呀,:)
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-3-13 08:07:34 | 显示全部楼层
一直没有研究vl与excel的使用,看到你的程序才想写写看,
从你的程序中看,所有储存格格式都设为文字,这个性质是如何写的,
是储存格style性质吗? vl与excel资料太少,请多指教!!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2003-3-13 09:57:42 | 显示全部楼层
最初由 LUCAS 发布
[B]一直没有研究vl与excel的使用,看到你的程序才想写写看,
从你的程序中看,所有储存格格式都设为文字,这个性质是如何写的,
是储存格style性质吗? vl与excel资料太少,请多指教!! [/B]

由我无法知道别人所画图中块中的属性是怎样的,所以采用文字这个性质不然象”01-01“之类就会写成年了方法是用下面代码现实,hww-cells-obj为CELLS对象。
另你的收悄悄话的空间已经满了,请去清一清:)

  1. (vlax-put-property  hww-cells-obj "NumberFormatLocal"  "@"  )
复制代码
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-3-13 13:22:39 | 显示全部楼层
謝謝你的指導!我已寫出一個一樣的程序,只是速度慢了點,有待改進!!!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2003-3-18 06:28:59 | 显示全部楼层
谢谢,我们也在作属性提取的程序
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-4-26 14:05 , Processed in 0.285532 second(s), 60 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表