MERGE 2 MACRO

[PAT44]

Hi,
I have 2 macro that are close to what I need. The first one is to open a browser to select in wich folder you want to save the active file as pdf. The second one is for changing material in all parts within the specified path.It open each part one by one, change material and save & close it.

What I need is to open browser to select the folder where it will open each document and, if it s a part, open new part template and insert the part, close old part and overwrite it with the new part. Same with assy, and copy all sheets and paste it into the new drawing template and overwrite it as well.

I m sure something can be done with it! But I m not so good with vba and api code.

Any ideas?
(the macro are available at

http://sw.fcsuper.com

save as pdf with folder selection and change bulk material)

 

[kellnerp]

Make one a subroutine in the other or make both subroutines ina third macro. Of course you then have to make sure that all global variables have the same name in both subs.

TOP
CSWP, BSSE

http://www.engtran.com

http://www.niswug.org

http://www.linkedin.com/in/engineeringtransport

Phenom IIx6 1100T = 8GB = FX1400 = XP64SP2 = SW2009SP3
"Node news is good news."

 

[PAT44]

Ok, I tried to create a new module and to call it...but I dont know why, it does not work. the browser is not displaying and the module dont play.

I replace the code into the change material macro for other things (I tried to open new part template and insert the part into it, close old part and overwrite it with the new one), but nothing work. I m not able to put the path into variable or something nor the name to save it.

I m poor to assign variable..!

 

[kellnerp]

You want to combine both macros into one module and make sure the variable names are consistent.

TOP
CSWP, BSSE

http://www.engtran.com

http://www.niswug.org

http://www.linkedin.com/in/engineeringtransport

Phenom IIx6 1100T = 8GB = FX1400 = XP64SP2 = SW2009SP3
"Node news is good news."

 

[PAT44]

yes, and it s not an easy thing. Do you know why when I use part.getpathname=x and I use Part.InsertPart2("X", 515) it dont work? The path is correct (i test it with a msgbox and it was right!), so i dont know!

Thanks for your time

 

[Gupta65]

Are you looking to update the file templates?? If yes then check this:

http://gupta9665.wordpress.com/2009/08/21/how-to-change-sw-file-system-options/

Deepak Gupta
CSWE, CSWP, CSDA
SW 2011 SP5.0 & 2012 SP3.0
Boxer's SolidWorks™ Blog