如何从 Excel 导出为 PDF 到指定位置?
How to export from Excel to PDF to a determined location?
我有此代码要导出到 PDF
,但它会转到 文档文件夹 。我想将其导出到其他位置。我该怎么做?
这是代码:
Private Sub CommandButton1_Click()
Range("a1:k44").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ru & "REMITO " & Range("C7") & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub
将excel导出为PDF到指定路径,可以使用下面的代码。您需要根据自己的需要进行调整,这是基础。
Private Sub CommandButton1_Click()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="path_here+filename.pdf"
End sub
示例:
Filename:="C:\Documents\newfolder2\archive.pdf"
我有此代码要导出到 PDF
,但它会转到 文档文件夹 。我想将其导出到其他位置。我该怎么做?
这是代码:
Private Sub CommandButton1_Click()
Range("a1:k44").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ru & "REMITO " & Range("C7") & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub
将excel导出为PDF到指定路径,可以使用下面的代码。您需要根据自己的需要进行调整,这是基础。
Private Sub CommandButton1_Click()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="path_here+filename.pdf"
End sub
示例:
Filename:="C:\Documents\newfolder2\archive.pdf"