如何实现将一批CAD文件中某个特定的属性块中的某个属性值更改为特定值???

maoyangmy · 发表于 2008-6-20 12:27:05

马上注册，结识高手，享用更多资源，轻松玩转三维网社区。

您需要登录才可以下载或查看，没有帐号？注册

x

如何实现将一批CAD文件中某个特定的属性块中的某个属性值更改为特定值???(用CAD编程)
特定值可能为某个固定的文本, 也可能是一个文本前缀加上一个流水号??

yqc801110 · 发表于 2019-10-11 09:16:15

请问这是怎么解决

7788WRLWEE · 发表于 2009-6-29 09:23:56

谢谢版主，我是了一下，还不太会用，不过已经调出来了

woaishuijia · 发表于 2009-6-2 12:52:33

工具>宏>加载工程
工具>宏>宏>运行

7788WRLWEE · 发表于 2009-6-2 09:59:51

怎么没人告诉我呀

7788WRLWEE · 发表于 2009-5-15 08:20:52

3#上来看到后希望给予答复谢谢

7788WRLWEE · 发表于 2009-5-15 08:19:09

你好，我也没弄明白

maoyangmy · 发表于 2009-5-14 22:37:15

3楼提供的文件是dvb格式的，如何执行？

7788WRLWEE · 发表于 2009-5-14 09:19:48

没有人回答我的问题，楼主告诉我，怎么处理谢谢

7788WRLWEE · 发表于 2009-4-20 08:23:38

我很想学呀急急急急

7788WRLWEE · 发表于 2009-4-20 08:18:42

你好，我不知道怎么调出窗口一，您能告诉我么？谢谢

:)

7788WRLWEE · 发表于 2009-4-17 08:09:38

可以告诉我么，谢谢

7788WRLWEE · 发表于 2009-4-17 08:08:19

如何调出窗口一

7788WRLWEE · 发表于 2009-4-14 16:01:12

你好，你是了么，好用么

woaishuijia · 发表于 2008-6-23 20:49:31

编程要点

1、插入用户窗体，在窗体上放置公共对话框（CommonDialog控件），并设置其属性Filter = "*.dwg|*.dwg"以过滤文件类型；Flags = 512以一次获得多个文件路径；
2、用Documents对象的Open方法逐个打开要修改的文档；
3、遍历文档（Document对象）的所有图元，用ObjectName属性（＝"AcDbBlockReference"）寻找符合给定条件的“块参照”（AcadBlockReference对象）；
4、用“块参照”的GetAttributes方法获得该“块参照”的属性集；
5、用属性对象的标记（TagString）查找符合给定条件的属性；
6、修改属性对象的TextString为新值；
7、用文档的ReadOnly属性判断文档是否用只读方式打开，对只读文档用SaveAs方法保存；其它用Save方法保存；
8、用Close方法关闭文档；

PLXG.rar (14.69 KB, 下载次数: 123)

附件是用上述方法编制的程序，可以打开同一目录下的多个DWG文档，修改指定的块参照的指定的属性值，保存修改结果并以文本文件记录被修改的文件、被修改的内容等。

登录/注册后可看大图

图1为用户窗口，其中属性值可以是多行文本。点击“浏览”按钮后会弹出“打开文件”对话框如图2

登录/注册后可看大图

在“打开”对话框可以在同一目录下选择多个文档；
在用户窗口点击“开始修改”按钮，所有含有符合给定条件的块参照的文档都将被修改并保存。
选中用户窗口的“创建日志”复选框，程序会在文档目录下创建一个文本文档，记录修改信息。
本程序仅供参考。

ps122hb · 发表于 2008-6-21 13:24:40

vb的程序，我会搞，和我联系吧

		自动登录	找回密码
密码			注册

通知

[已解决] 如何实现将一批CAD文件中某个特定的属性块中的某个属性值更改为特定值???

马上注册，结识高手，享用更多资源，轻松玩转三维网社区。

回复 3# woaishuijia 的帖子

使用VBA的解决方案

评分