Visual Basic Forum for Visual Basic Programmers VB

[toddswint]

Hello,

I am trying to set up a command button on "sheet A" to automatically generate a PDF of sheet "Contract (Client)".

I'm using PDF995 and to do this manually requires clicking print, selecting pdf995 from the printer selection combo in the "Print" dialogue window and then clicking OK.

PROBLEM: I don't know how to write the code in the following procedure to default the printer selection to PDF995.

Any Ideas?

Sub PDF_Client_Contract()
'
' PDF_Client_Contract Macro
' Macro recorded 4/13/2006 by ASPAdmin
'
Sheets("Contract (CLIENT)").Visible = True
Sheets("Contract (CLIENT)").PrintOut Copies:=1, Collate:=True
Sheets("Contract (CLIENT)").Visible = False
Sheets("INPUT - CLIENT").Select
End Sub

Thanks in advance. You guys are geniouses!