我将此代码导出到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
答案 0 :(得分:0)
将excel PDF格式导出到特定路径,您可以使用下面的代码。您需要根据需要进行调整,这是基础。
Private Sub CommandButton1_Click()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="path_here+filename.pdf"
End sub
实施例:
Filename:="C:\Documents\newfolder2\archive.pdf"