excel用按钮控件打印,指定打印机,就只需要添加PrintOut方法的一个参数即可。
如我需要设置打印机为Fax来打印,而我默认的打印机是XPS的,如下图:
那么代码如下:
Sheets(1).PrintOut ActivePrinter:="Fax"
双引号里面就写打印机的名称就可以了。
你可以自己设置默认打印机打印的
sub 打印
With Workbooks(Path & "" & e & ".xls").Sheets(n)
.PageSetup.PrintArea = .Range(.Cells(1, 1), .Cells(d, 10)).Address
.PrintOut copies:=1
end with
end sub
这里使用默认打印机打印
打印的区域就是A1到J的第d行
打印的工作簿名字是e
打印的工作表是n
控制面板 查看设备和打印机把你需要的打印机设置成默认就行了。