"File" is a variable. You can set it to whatever you want.
1. Derived from the code as shown
File = Folder & ActiveWorkbook.Name
File = Left(File, InStrRev(File, ".")) & "pdf"
2. Hard coded to a specific name e.g. File = "C:\Test\Test.pdf"
3. Allows you to pick e.g. File = Application.GetOpenFilename()

What are you after?