我正试图让VBA解雇命令
sImportFilePath = Application.GetOpenFilename(FileFilter:= _
"Excel Files (*.xls), *.xls", Title:="Choose The Source File")
Application.Workbooks.Open (sImportFilePath)
sImportFileName = FunctionGetFileName(sImportFilePath)
当我单步执行该功能时它们会工作,但是当我使用热键Ctrl + Shift + F或任何其他热键时,该Application.Workbooks.Open命令可以工作,但它会导航新的Excel文档,然后不会执行任何操作.但是,当我在开发人员选项卡中打开"宏"时,选择我的宏,然后单击"运行",一切运行正常.
我正在尝试将文件导出为PDF作为更大宏的一部分.但是,我希望用户可以选择将文件保存到他或她选择的目录中,我认为这对于浏览对话框来说是最简单的.但是,我无法弄清楚如何拉一个.目前,我的代码如下所示.
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\<filepath>\11.08E PT5 Executive Summary - v3.2.pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, From:=1, To:=3, OpenAfterPublish:=True
我想用对话框的结果替换.