|
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 |
|