几何尺寸与公差论坛

 找回密码
 注册
查看: 647|回复: 0

【转帖】mirror component in assembly

[复制链接]
发表于 2009-4-13 12:49:35 | 显示全部楼层 |阅读模式
mirror component in assembly
trying to mirror the component though a plane like a picture below. then i want to mirror like the next picture
and the i record macro using insert>>mirror component command. the code that i recorded are:
dim swapp as object
dim part as object
dim selmgr as object
dim boolstatus as boolean
dim longstatus as long, longwarnings as long
dim feature as object
sub main()
set swapp = application.sldworks
set part = swapp.activedoc
set selmgr = part.selectionmanager
part.mirrorsubassembly
boolstatus = part.extension.selectbyid2("right plane", "plane", 0, 0, 0, true, 0, nothing, 0)
boolstatus = part.extension.selectbyid2("hinge-1@assem2", "component", -0.1267148684469, 0.05833566363731, -0.01904039532695, true, 0, nothing, 0)
boolstatus = part.editrebuild3
part.clearselection2 true
end sub
when i run this macro again it's don't working. can anyone tell me where i modify this code for it's working?
thanks,
shukree
edited: 04/11/2008 at 02:47 am by shukree deasa
click for full image
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|小黑屋|几何尺寸与公差论坛

GMT+8, 2024-12-23 14:59 , Processed in 0.034020 second(s), 19 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2023 Discuz! Team.

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