close
希望以VBA設定所有欄位單一頁面列印,如下圖:
Image001

程式碼:
Application.PrintCommunication = False
With Sheets("工作表1")
.PageSetup.Zoom = False
.PageSetup.FitToPagesWide = 1
.PageSetup.FitToPagesTall = 0
End With
Application.PrintCommunication = True
arrow
arrow
    全站熱搜

    keven 發表在 痞客邦 留言(0) 人氣()