Excel VBA print to "PDF Printer"?

[ladams1949]

In Excel, I need to
1. Select "PDF printer" from the printer list when printing a page
2. Recognize when the "Save As" window comes up
3. And then Sendkeys "finename~" to save the PDF file.

I have step 3, but I need help with 1 and 2. Thoughts? Thanks.

[ladams1949]

Just me again. I found an answer for 1. I just need 2. I should add that this is in VBA and Excel 2003.

Again, I just need to be able to recognize when a window captioned "Save As" appears so that I can then use sendkeys to provide the desired filename.

Thanks.

[ubentook]

You can trap for the display of the SaveAs dialog box in the ThisWorkbook Before Save event.
You can then display the SaveAs dialog box and include the file name to be used...
'--
'In the ThisWorkbook module...
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
On Error GoTo OutOfHere
If SaveAsUI Then
Application.EnableEvents = False
Cancel = True
Call MySubstituteSub
End If
OutOfHere:
Application.EnableEvents = True
End Sub
'--

'In a standard module...
Sub MySubstituteSub()
Application.Dialogs(xlDialogSaveAs).Show "My File Name"
End Sub