如何选择保存文件的文件夹？

Question

我想在PDF中打印一个Excel表格，并且我在下面尝试了此代码。但是，输出路径是在宏中确定的，我希望用户打开目录并选择要保存pdf的文件夹

Sub SaveSelectionAsPDF()

Dim saveLocation As String
saveLocation = "C:\Users\Documents\myPDFFile.pdf"


Selection.ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:=saveLocation

End Sub

我该如何解决这个小问题？