对CAD中选定图元按某文本文件中的替换配对进行替换的VBA宏代码不完全匹配（实用性极强

清风明月名字 · 发表于 2012-3-25 18:13:00

对CAD中选定图元按某文本文件中的替换配对进行替换的VBA宏代码不完全匹配的文本替换
将“阳光CAD批量替换默认列表.txt”文本文件放到F盘下，其中的内容每行呈“A>>>B”形式，A为被替换项，B为替换项。这样你就可以一次进行多个配对（无数个）的替换了。稍作修改也可以变成完全匹配式替换。本代码可同时替换单行文字、多行文字、属性定义，稍作修改也可以只替换其中一种。
在写作过程中大量套用了其它人的代码，不知姓名，致谢！
不完全匹配的文本替换
代码已经完善了。替换项由EXCEL文件轻易生成。希望能给大家的工作带来便利

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复