a_gunslinger
New Member
- Joined
- Jul 28, 2011
- Messages
- 8
Created a basic time saving macro assigned to Personal.xlbs that prints spreasheets I receive in emails to PDF. But I cant get the print to PDf function to work, not lieking the printer name I think.
Open a target spreadsheet.
Developer > Record Macro >
Give it a name and Shortcut Key
Store in > Personal.xlbs
Record Macro: File > Print > Printer = Adobe PDF > Print All Pages > Print > Choose filename and target save location
Stop Recording
Recording the Macro steps works and it prints. But When running th macro it hags with:
Run-time error 1004: Method 'ActivePrinter of object "_Application' failed.
Used all combinations of Adobe Printer names:
Sub SchedulesPDF()
'
' SchedulesPDF Macro
'
' Keyboard Shortcut: Ctrl+q
'
Application.ActivePrinter = "Adobe PDF Converter"
ActiveWorkbook.PrintOut 'Copies:=1, Collate:=True, IgnorePrintAreas:=False
End Sub
Any guideance appreciated ;^) <!-- / message --><!-- BEGIN TEMPLATE: ad_showthread_firstpost_sig --><!-- END TEMPLATE: ad_showthread_firstpost_sig -->
Open a target spreadsheet.
Developer > Record Macro >
Give it a name and Shortcut Key
Store in > Personal.xlbs
Record Macro: File > Print > Printer = Adobe PDF > Print All Pages > Print > Choose filename and target save location
Stop Recording
Recording the Macro steps works and it prints. But When running th macro it hags with:
Run-time error 1004: Method 'ActivePrinter of object "_Application' failed.
Used all combinations of Adobe Printer names:
Sub SchedulesPDF()
'
' SchedulesPDF Macro
'
' Keyboard Shortcut: Ctrl+q
'
Application.ActivePrinter = "Adobe PDF Converter"
ActiveWorkbook.PrintOut 'Copies:=1, Collate:=True, IgnorePrintAreas:=False
End Sub
Any guideance appreciated ;^) <!-- / message --><!-- BEGIN TEMPLATE: ad_showthread_firstpost_sig --><!-- END TEMPLATE: ad_showthread_firstpost_sig -->