麻辣家族討論版版's Archiver

liebe 發表於 2017-7-5 16:11

VB輸出PDF每次可自訂新檔名與新路徑

各位大大們好!

目前我正要用VB寫按鈕可以直接將檔案輸出成PDF
目前的程式碼檔名與路徑都是固定的,每次輸出的PDF檔案都會把舊檔覆蓋,但我想要同時保存舊檔與新檔,而不是取代它
請問我該如何更改,在每次輸出成PDF的時候可以另存新檔名與更改路徑想要儲存的路徑呢?
程式碼如下:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
          "D:\Test\P2\ Study.pdf" _
        , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
        :=False, OpenAfterPublish:=True

還麻煩大大們教教我!感謝大家!

hayden0009 發表於 2020-4-8 13:40

路徑假設:c:\test\
檔名假設:test
輸出會放置於:c:\test\test.pdf
================================================================================
Dim File_Name As String
Dim Path As String
UserName = Environ("username")
Path = InputBox("路徑", "")
MkDir Path
File_Name = InputBox("檔名", "")
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Path & File_Name & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False

頁: [1]

麻辣家族討論版版為 麻辣學園 網站成員  由 昱得資訊工作室 © Since 1993 所提供