Configure SW for "Save" macro

L

Len K. Mar 22 years ago

Hello,

I remember reading about a similiar macro years ago on this site. My searches have been in vain since I can't for the life of me figure out what to include in the search engine other than "macro".

I've tried duplicating the macro from memory but I'm running into problems on playback.

Prior to saving a SW file I want to be able to run a macro that cleans up all those annoying settings (such as displayed viewing planes, points, etc...) and views (how many times do you have to hit zoom extents and diametric to get the part/assembly to fill your screen propery. Again, tried doing this with a recorded macro but with little success.

Why? -- because I would like a decent preview that doesnt' display dimensions or has the part off to one side, etc...

Any suggestions would be appreciated.

Len

Vote

S

Sean Phillips 22 years ago

sub main()

dim swapp as sldworks.sldworks dim mymodeldoc as sldworks.modeldoc2 dim bret as boolean

set swapp = new sldworks.sldworks set mymodeldoc = swapp.activedoc

bret = myModelDoc.SetUserPreferenceToggle ( swDisplayAxes , false) bret = myModelDoc.SetUserPreferenceToggle ( swDisplayPlanes , false) bret = myModelDoc.SetUserPreferenceToggle ( swDisplayOrigins , false) bret = myModelDoc.SetUserPreferenceToggle ( swDisplayTemporaryAxes , false) bret = myModelDoc.SetUserPreferenceToggle ( swDisplayCoordSystems , false) bret = myModelDoc.SetUserPreferenceToggle ( swDisplayReferencePoints , false) bret = myModelDoc.SetUserPreferenceToggle ( swDisplaySketches, false) bret = myModelDoc.SetUserPreferenceToggle ( swDisplayReferencePoints2, false)

'save the document here.

end sub

Vote

L

Len K. Mar 22 years ago

Thanks,

Len

Vote

Configure SW for "Save" macro

Join the Discussion

Didn't find your answer?