Access - Imprimir un único registro a partir de un formulario

Hola
He creado una base de datos de informes de diagnósticos por paciente, pero cuando doy imprimir a partir del informe tengo que utilizar la ventana de la impresora. Se puede agregar un botón o comando que me permita imprimir directamente desde el formulario el registro que se está ingresando obviando el paso de la impresora?

a ésto ya te contestó ENRIQUE RAMIREZ en un post hace unos pocos dias

EN EL EVENTO AL HACER CLIC DE UN BOTON
DoCmd.OpenReport "NOMBRE-DEL-INFORME", acViewNormal, , , acWindowNormal

José este es otro Alejandro ese no soy yo

Hola Buenos días
utilicé el código que me proporcionaste, efectivamente efectúa la orden de imprimir pero me imprime todos los registros (tengo una base de datos con 6000 registros), no solo el que esta activo.
Manejo pacientes que acuden para recoger su diagnóstico, hago la búsqueda desde el formulario, por ejemplo el registro AA5678, lo que desearía es imprimir ese único registro directamente desde el formulario.
Gracias nuevamente

Si en tu formulario tienes un campo ID que identifica el registro que te interesa imprimir y también lo tienes en tu informe, pasa ese valor como parámetro en el Openreport


Yo pregunto si quiere ver una vista previa o imprimir directamente:


If (MsgBox("Quieres ver una vista previa del informe?", vbYesNo, "IMPRIMIR INFORME")) = vbYes Then
DoCmd.OpenReport "NOMBRE_DEL_INFORME", acViewPreview, , "[CAMPO_ID_EN_INFORME]=" & Me.CAMPO_ID_EN_FORMULARIO.Value
Else
DoCmd.OpenReport "NOMBRE_DEL_INFORME", , , "[CAMPO_ID_EN_INFORME]=" & Me.CAMPO_ID_EN_FORMULARIO.Value
End If



Pon el código en el evento click de un botón y cambia los valores de los nombres de informe y los campos. Asegúrate de tener en el informe el campo ID (puedes tenerlo oculto si no quieres que salga)


Si directamente quieres imprimir usa la solo la parte del ELSE en el bucle IF


En este caso el campo ID sería tipo número, si es tipo texto tendrías que estar entre comilla simple ( ' ):
"[CAMPO_ID_EN_INFORME]= ' " & Me.CAMPO_ID_EN_FORMULARIO.Value & " ' "
(he colado algunos espacios en blanco para que pueda verse mejor donde esta la comilla simple y la doble)

Muchísimas gracias