在"ACCESS“程序中,您需要打印表单的活动页面,并在工作表背面打印PDF文件(通过此页面中的超链接)。我有复式打印机。
Private Sub duplexprinter_Click()
Dim myform As Form
Dim pageno As Integer
pageno = Me.CurrentRecord
Set myform = Screen.ActiveForm
DoCmd.SelectObject acForm, myform.Name, True
DoCmd.PrintOut acSelection, pageno, 1, , 1
CreateObject("Shell.Application").Namespace(0).ParseName(Me.path).InvokeVerb ("Print")
DoCmd.SelectObject acForm, myform.Name, False
End Sub打印机将此代码视为两个连续作业,因此它将打印在两个不同的工作表上。
请帮我写一张纸两边打印的代码。
发布于 2021-12-23 16:45:56
我会这样做:
DoCmd.OutputTo acOutputForm, myform.Name, acFormatPDF, strFile1https://superuser.com/questions/34284/combine-merge-pdf-files-in-windows
https://stackoverflow.com/questions/70460841
复制相似问题