Inptbox to give print dates

[NicoCaps]

Hi all,

I'd like the users of the plannings to be able to print out in pdf format.
Since it's a generic macro I want them to input the dates where the prints
should begin and end. Here's the small code I'm struggling with. Can anyone
tell me where my error is?

Thanks

Nico

Sub Print
Dim StartDate As Variant
Dim EndDate As Variant
StartDate = InputBox("Enter Start Print date")
EndDate = InputBox("Enter End Print date")
FilePrintSetup "PDFCreator"
FilePrint FromDate:="StartDate", ToDate:="EndDate"

End Sub