论坛 › ExcelVBA开发 › 一次性打印工作簿下所有工作表的方法

hessen 发表于 2017-1-6 13:48:48

一次性打印工作簿下所有工作表的方法

一次性打印工作簿下所有工作表的方法
Private Sub Workbook_Open()
   ActiveWorkbook.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
End Sub



免费版企业版均适用。

yaer 发表于 2017-9-5 16:23:07

这个免费版怎么用？

hessen 发表于 2017-9-7 14:12:00

yaer 发表于 2017-9-5 16:23
这个免费版怎么用？

免费版也可以这么使用，打印预览的时候会执行workopen事件的代码。

yaer 发表于 2017-9-16 07:07:18

hessen 发表于 2017-9-7 14:12
免费版也可以这么使用，打印预览的时候会执行workopen事件的代码。

那这个代码写在什么地方？

hessen 发表于 2017-12-26 14:55:54

写入Excel中导入快表，打印预览时，就会执行。

查看完整版本: 一次性打印工作簿下所有工作表的方法