I have the following linked to a button and currently works great:

ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\Robby\Desktop\Report Test2.pdf",
Quality:=xlQualityStandard, IncludeDocProperties:=True,
IgnorePrintAreas:=False, OpenAfterPublish:=True

Is there a way that I can either specify a cell location for the filename
property or open a folder dialog box allowing the user to specify?

Thanks all!