小弟文件已設定好列印範圍

需要兩個按鈕:

1.列印 第1頁第1頁
2.列印 第2頁至第2頁






另外在Windows電腦時可使用以下語法直接存檔
使用MAC時,需“彈出另存新檔的視窗""指定檔名為儲存格A2",該如何修改?


Sub Print_PDF()

File_Name = Range("A2").Value Page1 = 1 Page2 = 1

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\Users\Admin\Google 雲端硬碟\文件\" & File_Name & ".pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False, From:=Page1, To:=Page1

End Sub






請求各位大大幫忙一下!!感謝
文章分享
評分
評分
複製連結

今日熱門文章 網友點擊推薦!