Printing Excel to CutePDF

B

Bruce

Hi,

I have the following macro to print 3 worksheets to a PDF using CutePDF.

1. The trouble is this is printing the 3 worksheets to 3 separate PDF's.
How can I force it to save the 3 worksheets to a 3 page PDF?

2. How can I specify a default filename in the macro such as "myReport"
instead of being promoted for a filename manually?

Bruce.



Sub DailyReports()

Application.ScreenUpdating = False
myArray = Array("Strategy", "Signals_Breakout",
"Signals_Breakout_Delay")
For Each a In myArray
Range("A1").Select
Sheets(a).Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1,
ActivePrinter:="CutePDF Writer on CPW2:", Collate:=True
Next a
Sheets("Update").Select
Application.ScreenUpdating = False

End Sub
 
J

Jon Peltier

I don't know about CuteFTP. I mean, it works fine, but it isn't controllable
via VBA other than being able to be selected as an alternate printer.

Another free FTP printer driver is PDFCreator. This driver has a VBA
interface, and Ken Puls of Excel Guru (http://excelguru.ca) has written some
tutorials about it.

- Jon
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Print to PDF code for both Cute PDF and Adobe 1
Not able to initiate printer from checkbox 1
VB Code for saving PDF Print File 1
Word macro that can call cells out of Excel for a find and replace 0
Closing PDF file from Excel VBA (Adobe Reader, Adobe Acrobat, Browser) 0
Cutepdf Writer and Excel 2003 0
creating a macro to print PDF 5
Print To pdf Not Working 5

Top