【发布时间】:2020-07-02 07:08:52
【问题描述】:
我正在努力将我的工作表导出为 PDF。
这是我的代码,仅供参考,我使用的是 Office 2016 for MAC
Sub saveactiveworkbook()
Dim FileName As String
Dim FolderName As String
Dim Folderstring As String
Dim FilePathName As String
ActiveSheet.PageSetup.Orientation = xlLandscape
FolderName = "TestVBA"
FileName = "DV" & ".pdf"
Folderstring = "/Users/Vallier/Documents/Test/TestVBA"
FilePathName = Folderstring & Application.PathSeparator & FileName
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
FilePathName, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False
MsgBox FilePathName
End Sub
当我启动程序时,我有一个警告框,上面写着: “运行时错误‘1004’:
应用程序定义或对象定义的错误"
我尝试通过预先通过“ws”定义活动工作表来解决此问题,但随后出现另一个错误:
“object_worksheet 的 ExportAsFormat 失败”
有什么想法吗?
非常感谢,
【问题讨论】:
-
您的问题可能与开始 / 有关。您是否尝试在此位置保存文件,然后使用 GetOpenFileName 查看您需要的实际文件夹路径?
-
在此处查看我的答案stackoverflow.com/questions/48693411/… 并确保您拥有该文件的有效路径。
-
@QHarr 不幸的是,这没有帮助。我正在尝试将工作表导出为 pdf,并从终端导出路径
-
终端路径不一定与运行代码所需的路径相同。这是您根据我的链接获得的。你是说你没有其他方法可以得到路径吗?抱歉,如果密集。
标签: excel vba macos pdf export