Not printing correctly...

[Outatym]

The code below is supposed to ask the user if they would like to print a PDF
of their document, then bring up the print dialog box with CUTEPDF already
selected. Then once they select to print, it waits until the document is
spooled until doing the next step. If not, it will skip it will ask if they
want to print a hard copy. If they select yes then it will bring up the
print dialog box from the CutePDF printer. I can't get the code to work as
it seems to be written here:


'START Save PDF
If MsgBox("Would you like to print a PDF of your proposal?", vbYesNo) =
vbYes Then
With Dialogs(wdDialogFilePrintSetup)
.Printer = "CutePDF Writer"
.DoNotSetAsSysDefault = True
.Execute
End With
ActiveDocument.PrintOut (Background = False)
End If
'END Save PDF

'START Print Proposal
If Response = MsgBox("Would you like to print your proposal?", vbYesNo)
= vbYes Then
Dialogs(wdDialogFilePrint).Show
PPSPrintForm.Show
ActiveDocument.PrintOut (Background = False)
Else
Application.Quit (wdDoNotSaveChanges)
End If
'END Print Proposal