La Web del Programador: Comunidad de Programadores
 
    Pregunta:  10954 - IMPRIMIR REGISTRO
Autor:  Fernando Jesús Cortes Carmona
hola amigos:

quiero imprimir SÓLO el registro que acabo de cumplimentar en un formulario.
Para ello en dicho formulario tengo un commandbutton, que al hacer clik ejecuta
el siguiente procedimiento:

DoCmd.OpenReport "informe1", acViewNormal,, "Campo1claveprincipal=" & CStr
(Me.Campo1clave principal)

funciona pero si trato de meterme en propiedades de la tabla me sale un mensaje
diciendo que hya un formulario o una consulta que esta abierto ¡cuando eso no es
cierto!

gracias por vuestra colaboración

  Respuesta:  Fernando Cortes Carmona
gracias a los compañeros que me han dado la solución

Private Sub Comando4_Click()

Dim stDocname As String
Dim stLinkCriteria As String

stDocname = "Informe1"
stLinkCriteria = "dni'=" & (Me.dni) & "'"
DoCmd.OpenReport stDocname, acViewPreview, , stLinkCriteria
DoCmd.PrintOut acPrintAll, , , acHigh, 1, False
DoCmd.Close

End Sub