使用VBA将Excel文件另存为pdf到本地驱动器

Question

我对VBA还是很陌生，因此，感谢您能提供的任何帮助。 我的以下代码出了点问题，并且我一直在谷歌搜索一段时间以尝试解决问题。 我有一个excel工作表，我试图使VBA成为：1.使用Cell C7和C14数据作为文件名创建PDF。2.将此PDF保存到我的本地G盘（VBA文件夹）。

我的宏完成了OK上方的第1步，但是G：\\ VBA工作文件夹中没有pdf文件。

有什么想法吗？

一旦掌握了这一点，我就需要编写代码以遍历数据并一遍又一遍地重复此步骤，但这是下一个任务。

感谢您...

Sub saveaspdftodrive()

    Dim SaveAsStr As String

    SaveAsStr = "G:\VBA work" & ActiveSheet.Range("C7") & ActiveSheet.Range("C14").Value

    ActiveSheet.ExportAsFixedFormat Type:=x1TypePDF, _
        Filename:=SaveAsStr & ".pdf", Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas _                                                                                                                              
        :=False, OpenAfterPublish:=True
End Sub