关于连续打印时的自定义纸张的引用 Post By:2015/3/10 14:52:00 [只看该作者]
我在打印机里已经定义了纸张名称:aaa
现在在代码里要引用,要怎么处理?
Dim App As New MSExcel.Application Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls") Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1) With Ws.PageSetup '设置打印区域 .PaperSize = ??? '纸张大小 这里要怎么写? End With App.Visible = True Ws.PrintPreview App.Quit