I am trying to print an excel spreadsheet to adobe without getting a
prompt for the filename. I am getting the runtime error '1004'
"Method 'PrintOut' of object 'sheets' failed"

Can anyone help me?

Sheets(Array("Front Sheet", "Sales", "MP")).Select
Sheets("Front Sheet").Activate
ActiveWindow.SelectedSheets.PrintOut _
Copies:=1, _
ActivePrinter:="Acrobat PDFWriter on LPT1:", _
PrintToFile:=True, _
PrToFilename:="C:\temp\Week 43.pdf"