使用 VBA 打印用户表单

Posted 2023-04-19

【中文标题】使用 VBA 打印用户表单

【英文标题】：Printing a userform using VBA

【发布时间】：2017-12-15 09:09:30

【问题描述】：

我正在尝试打印我的用户表单。

代码：

Forms("frm_manager_stats_NEW").Printer.Orientation = acPRORLandscape
DoCmd.PrintOut , 1, 1, acLow, 1, False

我也试过这几行代码：

DoCmd.PrintOut acPrintAll

和

DoCmd.PrintOut

错误： 当我按下命令按钮运行代码时，Access 调试并让我选择关闭或调试，无论我按下哪个应用程序然后关闭。

发生了什么？

【问题讨论】：

有错误提示吗？

没有错误 - 它只是点击应用程序调试，说应用程序已停止响应，然后整个应用程序关闭

尝试在 dcmd.printout 之后和第一个逗号之前添加“acPages”。还要确保表单已加载并处于活动状态。

没有工作 - 打印表单弹出，因此它必须启动该过程但随后停止工作

我会说这属于意外崩溃类别。请参阅this answer，并按照那里列出的步骤进行操作。

【参考方案1】：

我认为您必须先在打印预览模式下打开表单，然后将其打印出来（就像我一次性完成的一样 我的项目）。

请执行以下操作：

DoCmd.OpenForm "YourUserFormName", acPreview
If Screen.ActiveForm.Name = "YourUserFormName" Then
DoCmd.PrintOut
End If

试试这个，希望它对你有用，就像它对我有用。

【讨论】：

由于某种原因，这也不起作用。是不是很奇怪