EXCEL宏按钮一点，保存并指定打印机打印

longwin · 发表于 2024-7-4 19:35

自己试试吧。。。。。

rdf · 发表于 2024-7-4 19:45

longwin 发表于 2024-7-4 19:35
自己试试吧。。。。。

谢了，点按钮，同时，是不是表单也保存了？

longwin · 发表于 2024-7-4 19:59

是的。。。

rdf · 发表于 2024-7-5 08:57

longwin 发表于 2024-7-4 19:59
是的。。。

保存后，直接关闭当前表单

longwin · 发表于 2024-7-5 09:01

关闭了还怎么打印？只是保存，不关闭。

rdf · 发表于 2024-7-5 09:03

longwin 发表于 2024-7-5 09:01
关闭了还怎么打印？只是保存，不关闭。

打印好后，关闭表单

rdf · 发表于 2024-7-5 09:09

因为是用勤哲系统的，因为点按钮后，当前表格还没有关闭

longwin · 发表于 2024-7-5 09:52

Sub dy()
ThisWorkbook.Save
ThisWorkbook.PrintOut ActivePrinter:="CS 300i"  '打印机名称CS 300i,替换成自己的
waitTime = Now + TimeValue("00:00:05") ' 等待5秒
Application.Wait waitTime
ThisWorkbook.close
End Sub

15968725770 · 发表于 2024-11-13 07:59

longwin 发表于 2024-7-4 18:49
Sub dy()
ThisWorkbook.Save
ThisWorkbook.PrintOut ActivePrinter:="CS 300i" '打印机名称CS 300i,替换 ...

打印第一页，或打印指定区域

		自动登录	找回密码
密码			免费注册