Excel Vba Adobe Pdf Printer
This procedure finds a specifically named printer, uses its driver to produce a PostScript file, then uses Acrobat Distiller to convert the.ps to.pdf. You will need to add a reference to Acrobat Distiller manually in the VBA editor. Creating PDF File from Excel using VBA Script - Adobe Acrobat Windows. I have Excel 2000 and Adobe Acrobat v6.0 Standard. I'm trying to use a Visual Basic for Applications (VBA) macro to output reports to PDF files.
Text/NEAR NEW w/2 folded corners & faint margin discoloration. Translated to English by Mary Innes, first published 1955; this is a reprint of 1976. Softcover/VG w/edge & surface wear, faint spine creasings, and light soiling (water splash?) to rear. A hexametric epic poem, in Latin, retelling Greek & Roman myths in roughly chronological order by Roman poet Ovid (43 BC - AD c. Ovid metamorphoses mary innes pdf printer.
Hi, I'm running Excel 2000 from the MS Office Premium on Win. XP Pro and have recently installed Acrobat Professional 7.0.Everything between Excel and Acrobat works fine when doing things manually. That is, I can use the 'Adobe PDF' printer driver, or I can click on one of the 3 new Adobe Icons on my button menu and everything works just fine.
Now, when I use VBA, that's another matter. So far here is what has happened: I used the VBA command:
ActiveWindow.SelectedSheets.PrintOut _
Copies:=1, ActivePrinter:='Adobe PDF on Ne08:',
PrintToFile:=True, Collate:=True, PrToFileName:=sSheetName & sSuffix & '.pdf'
to print the file and got the error: When you create a postscript file you have to send the fonts. Please go to the printer properties, 'Adobe PDF Settings page and turn OFF the option 'Do not send fonts to Distiller'.
This I fixed easily enough, although not in an elegant way, I just went to the Win. Printer folder, pulled up the printer's properties and made this setting unchecked by default. That saved me having to figure out how to programmatically change it.
With a little tweaking of the code and all seemed good, my program was rifling through the sheets and creating pdf's from them. Then I tried to open the PDF's and no go. I tried various combinations of the PrintOut command, the most recent being:
Range(ActiveSheet.PageSetup.PrintArea).PrintOut _
Copies:=1, Preview:=False, ActivePrinter:='Adobe PDF on FILE:', _
PrintToFile:=True, Collate:=True, _
PrToFileName:=sFile
no change in result. So far I have determined that the error in the PDF doc. seems to be related to the fonts missing. I only say this because I tried opening the file in Illustrator (AI) and got prompted for the fonts and then once AI got past that I saw a whole bunch of text missing or partially form but the rest like the lines in the sheet and so on seemed fine in the PDF file. Adobe Reader just refuses to open the file so AI is obviously more forgiving.
Adobe Pdf Printer
I'm wondering if anyone has come across this problem and has a fix or workaround. If I new the command line args to Distiller I might just send the XLS file to Distiller using something like Shell(.) but I would need to know how to specify the sheet in the file and the file name I wanted as a result and Adobe doesn't seem to document that anywhere easy to find.
Any help will be appreciated.
Thanks.