Imprimir dos veces

Saludos:
Quisiera saber como se hace para imprimir
Dos veces un informe en access, ¿o sea
necesito dos copias del informe?
Ya tengo un informe y lo imprimo al apretar un botón en un formulario, ¿pero quiero que me imprima dos veces el mismo informe
alguna ayuda?
Gracias

1 Respuesta

Respuesta
1
En tu botón imprimir en vista de diseño, procedimiento agrega este código
Private Sub Detail_Format(Cancel As
Integer, FormatCount As Integer)
If PrintCount = 2 Then
RunningTotal = RunningTotal + OrderAmount
End If
End Sub
Hola: probé y no me funciona, pero seguro es porque tengo este código en ese botón:
¿Se puede aplicar ese código al que esta en el botón?
Private Sub btn_informe_Click()
Dim stDocName As String
stDocName = "inf_operaciones_liquidado"
If MsgBox("imprimir? ", vbInformation + vbYesNo, "pregunta?") = vbNo Then
DoCmd.OpenQuery "con_operaciones_numero_liquidacion"
DoCmd.OpenReport stDocName, acPreview
DoCmd.OpenQuery "con_operaciones_terminado"
Else
stDocName = "inf_operaciones_liquidado"
DoCmd.OpenQuery "con_operaciones_numero_liquidacion"
DoCmd.OpenReport stDocName, acViewNormal
DoCmd.OpenQuery "con_operaciones_terminado"
End If
End Sub
Gracias...
Agrega esto
DoCmd. OpenReport stDocName, acPreview
DoCmd. PrintOut acPages, 1, 1, , 2
Suerte

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas