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

rdf · 发表于 2024-7-4 18:40

EXCEL宏按钮一点，保存并指定打印机打印，VBA如何设置

rdf · 发表于 2024-7-4 18:41

在线大神帮忙一下

longwin · 发表于 2024-7-4 18:49

Sub dy()
ThisWorkbook.Save
ThisWorkbook.PrintOut ActivePrinter:="CS 300i" '打印机名称CS 300i,替换成自己的
End Sub

饮冰e士 · 发表于 2024-7-4 18:50

.PrintOut ActivePrinter:="Brother DCP-7030 Printer" '用本地的"Brother DCP-7030 Printer"打印
.PrintOut ActivePrinter:="\\VITREL-PC\Brother DCP-7030 Printer" '用网络的"Brother DCP-7030

饮冰e士 · 发表于 2024-7-4 18:51

难点在于指定打印机，可以参见下面的网址：
https://club.excelhome.net/forum ... ead&tid=1685861

.PrintOut ActivePrinter:="Brother DCP-7030 Printer" '用本地的"Brother DCP-7030 Printer"打印
.PrintOut ActivePrinter:="\\VITREL-PC\Brother DCP-7030 Printer" '用网络的"Brother DCP-7030

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

大神们，能不能麻烦上附一张设定好的EXCEL表

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

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

能不能，麻烦上传一张实例EXCEL表

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

大神们帮我附件设置好，再麻烦回传

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

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

对应宏按钮，怎么设置

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

你要是连代码怎么放都不知道的话，你也不知道怎么改成你自己的打印机啊

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