VBA Access imprimir informe llamando la opción de impresoras

Estoy realizando la impresión de un informe determinado, en si estoy llamando la opción de seleccionar la impresora pero me gustaría que solo me imprima el informe actual así la opción todos este marcada.

On Error GoTo sol_err
DoCmd.OpenReport "InformeDatos", acPreview, "iddatos = " & Nz(Me.Iddatos, 0)
DoCmd.RunCommand acCmdPrint
Salida:
'Cerramos el informe
DoCmd.Close acReport, "InformeDatos"
Exit Sub
sol_err:
If Err.Number = 2501 Then
MsgBox "Canceló la impresión", vbExclamation, "CANCELADO"
Else
MsgBox "Se ha producido el error: " & Err.Number & " - " & Err.Description
End If
Resume Salida
End Sub

Añade tu respuesta

Haz clic para o