Save as File

[mbesspiata]

I have this current VBA code to save a file as pdf but with a specific file name. How can I change this to it asks me to select the file name to "save as"?
Here is my current vba:
ActiveDocument.ExportAsFixedFormat OutputFileName:= _
"C:\Users\mbesspiata\Desktop\Dayton Countsheet File.pdf", ExportFormat:= _
wdExportFormatPDF, OpenAfterExport:=True, OptimizeFor:= _
wdExportOptimizeForPrint, Range:=wdExportAllDocument, From:=1, To:=1, _


Item:=wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _
CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
BitmapMissingFonts:=True, UseISO19005_1:=False

How can I make me ask for the file?
thanks

Mike

[Stefan Blom]

You can make use of code to display the Save As dialog box:

Dialogs(wdDialogFileSaveAs).Show