Hello

You may consider using some VBA to achieve this.
One way is to use the Workbook_BeforePrint event and specify the pdf printer
in the PrintOut method, eg:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PrintOut copies:=1, ActivePrinter:="CutePDF Writer on CPW2:"
End Sub

Please note you will need to amend the **activeprinter** name part of my
code to match precisely your pdf printer description.
To make sure that you use the correct printer description:
Set the default printer to your pdf printer
in a module paste this macro and note the exact description shown:
Sub ShowPrnName()
Msgbox Application.ActivePrinter
End Sub

Remember to set the previous default printer back.

HTH
Cordially
Pascal

There is program caleld SnagIt it can catch printer output you could give it
a try.