只需一步,快速开始
使用道具 举报
兰州人发表于2008-4-5 16:49:00看我发的帖子
看了你很多帖子,可是不能解决问题!!!急呀,很多图纸等着处理呢!!!
程序最后部分现在是这样:
uudimStyle.CopyFrom ThisDrawing
Next i ThisDrawing.SendCommand ("regen ") Unload Me
End Sub
老大,帮一下吧
或者你告诉一个能用VBA移动所有图元的命令,最多我移出去,再移回来,也是个能解决问题的笨办法
另外补充一下,不要和CAD里的标注更新命令那样,只用当前标注样式更新
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=66890
VBA移动所有图元的命令 ------------- 说清所用语句
要和CAD里的标注更新命令那样,只用当前标注样式更新,有什么区别
更新尺寸数据
Dim tt As AcadDimension tt.TextOverride难道还其它解决方法吗???
兰州人发表于2008-4-6 11:04:00VBA移动所有图元的命令 ------------- 说清所用语句要和CAD里的标注更新命令那样,只用当前标注样式更新,有什么区别更新尺寸数据 Dim tt As AcadDimension tt.TextOverride难道还其
提示引用无效
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 ) ©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途
GMT+8, 2025-5-1 14:59 , Processed in 0.148317 second(s), 23 queries , Gzip On.
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.