使用 VBA 打印用户表单

Question

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

代码：

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

我也试过这几行代码：

DoCmd.PrintOut acPrintAll

和

DoCmd.PrintOut

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

发生了什么？

Answer 1

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

请执行以下操作：

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

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