Office中国论坛/Access中国论坛

标题: 如何用vba设置默认打印机。 [打印本页]

作者: doney88 时间: 2015-1-27 13:39
标题: 如何用vba设置默认打印机。
公司有两台打印机，仓库打印一些单据需要用到针式打印机。

但是偶尔又回用a4打印机。

每次打印报表都要手动选，比较麻烦。

有什么办法可以用vba在打开报表后自动设置对应的默认打印机吗？

我试过printer 属性,但是devicename 这个是只读属性，修改不了。

谁能帮个忙吗？

在此谢过了

作者: tmtony 时间: 2015-1-27 13:58
修改控制面板的默认打印机（可考虑用API设置）

作者: Wanli_Li 时间: 2015-1-27 15:27
本帖最后由 Wanli_Li 于 2015-1-27 15:33 编辑

这个不需要使用代码。
你可以对每个报表在设计视图中指定打印机，一般报表制作过程中都是设置为默认打印机（就是在控制面板里打印机设置的那个默认打印机）。
对某一报表要指定打印机，可以在报表设计视图中单击菜单栏上的页面设置－－页面设置
这样不仅可以选择本地连接的打印机，也可以选择网络打印机了。

作者: doney88 时间: 2015-1-27 17:36
本帖最后由 doney88 于 2015-1-27 17:37 编辑

谢谢大家的热心，我需要的东西不复杂。

我用这种方式解决了。我是一个按钮打开单据打印的。
代码如下

DoCmd.OpenReport "材料出库单", acViewPreview

reports!材料出库单.Printer = Printers("打印机名字")

的方式解决了。

作者: tmtony 时间: 2015-1-27 21:15
在不同的电脑容易丢失

作者: doney88 时间: 2015-1-28 00:33

tmtony 发表于 2015-1-27 21:15
在不同的电脑容易丢失

对的，如果其他电脑没有链接那台网络打印机就不行。就会出错。

但是事实上是，我的单据只需要那一台电脑用。就是仓库的电脑。其他电脑用不到那个报表。

API 我还不是很懂。所以，现在就这样解决就可以了。

谢谢你。

作者: tmtony 时间: 2015-1-28 11:21
不客气

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)