batch printing from list

[arcticcatmatt]

I downloaded this neat batch printing example from the SW API help website. I gave it a list of 30 drawings and it printed them out in less than 2 mins! It didn't need to open solidworks every time to print.

It also did "scale to fit" for every drawing so every drawing printed out perfect.

I tried to run the program again and it won't work. I deleted it and reinstalled it and it doesn't work UGHGHG. I have 60 more to do. So I tried the task scheduler. That takes 10x as long as I can't just give that a "list" (they are all in different folders) and it has to open solidworks every time and it doesn't do scale to fit so the print is useless.

We have no PDM. What do you guys use for your batch printing? The macro that was great and fast was here

http://files.solidworks.com/API/Downloads/00000/0200s/0222/BatchPrint.zip

 

[CorBlimeyLimey]

I don't have need of a batch printing utility, but maybe these will help.

http://www.swcp3.com/dnld.asp?sw=swBatchPrint

http://www.ecocom.com/eng/index00.h...com.com/eng/EcoPrint/ecoprint01.htm&frameno=2

http://batchprocess.angelsix.com/2008/03/26/batchprocessxpress-v132/

 

[arcticcatmatt]

Thanks but

-swcp3 - doesn't work. I open the DLL and there is no ad in enabled. Apparently this only works on old SW versions and not 2007

- ecocom - free trial doesn't cut it

- batchexpress - crashes out and locks up my computer

 

[CorBlimeyLimey]

WOW ... it's just not your day is it.

 

[arcticcatmatt]

^ Tell me about it haha.

I just had to go in and print them one by one. Just finished. Its almost 4 pm. What a joke.

I wish that first batch program I posted would work again! Maybe its because I have an X64 computer.

Anyways. If someone comes up with a fix for it, wow what a tool it could be.

 

[JD80]

Try PAC4SWX there's a pretty comprehensive 30 day trial for you. It worked on 2007 when I had the demo

 

[Russell67]

Here is some code i wrote some time ago. Just copy and paste into excel. You will need to turn on hte following references. SLDWorks 2007 type library, SolidWorks 2007 Commands type library, SolidWorks 2007 Constant type library.

Your list of files should be located on Sheet1 and it should be the full path.

If you get errors after you paste it make sure to correct rows from the way the text was wrapped.


Sub Print_Drawing()

Dim swApp As SldWorks.SldWorks
Dim DwgDoc As SldWorks.ModelDoc2
Dim strDrawing As String
Dim lErrors As Long
Dim lWarnings As Long


' This section sorts and counts the rows for the number of item to search for
Range("A1:C200").Sort Key1:=Range("a1"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False,Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Dim totalrows As String
totalrows = Range("A65536").End(xlUp).Row
Worksheets("Sheet1").Cells(2, 4) = totalrows

For COUNTER = 1 To Range("D2").Value

Set swApp = CreateObject("SldWorks.Application")
swApp.Visible = False 'if you want to see the action change to true
strDrawing = Worksheets("Sheet1").Cells(COUNTER, 1).Value
Set DwgDoc = swApp.OpenDoc6(strDrawing, swDocDRAWING, swOpenDocOptions_ViewOnly, "", lErrors, lWarnings)
DwgDoc.Extension.PrintOut2 vPageArray, copies, collate, "", ""
newHour = Hour(Now()) 'speed up or slow down here
newMinute = Minute(Now()) '
newSecond = Second(Now()) + 1 '
waitTime = TimeSerial(newHour, newMinute, newSecond) '
Application.Wait waitTime
swApp.QuitDoc strDrawing

Next COUNTER

End Sub

 

[dogarila]

I am using swBatchPrint 1.5. No complains so far. It is free. Search for it on the net. I think I dowloaded it from fcsuper's website.