查看单个帖子
旧 2009-04-12, 10:11 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 【转帖】remove tolerances from drawing

remove tolerances from drawing
is it possible to remove all tolerances from a drawing by using a macro?
feroz mahomed
windows xp professional sp2
sworks 2009 sp2
nvidia quadro fx1500
yes editdimensionproperties2 will do that. select all the dimensions and run these codes.
******
sub main()
set swapp = application.sldworks
set swmodel = swapp.activedoc
swmodel.editdimensionproperties2 0, 0, 0, "", "", 1, 9, 2, 1, 11, 11, "", "", 1, "", "", 0
swmodel.clearselection2 true
swmodel.viewzoomtofit2
end sub
deepak gupta
sw2007 sp5.0
sw2009 sp2.1
answer deepak,
thanks. that works fine.
feroz mahomed
windows xp professional sp2
sworks 2009 sp2
nvidia quadro fx1500
quick
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)