Para crear un boton e imprimir un reporte
DoCmd. OpenReport "NombreReporte", acViewPreview
Crear boton para imprimir un registro actual
DoCmd.OpenReport "NombreInforme",acViewNormal,,"IdFactura = " & Nz(Me.IdFactura,0)
Ejemplo:
Private Sub Comando8_Click()
DoCmd.OpenReport "Consulta1inf", acViewPreview, , "codigop = " & Nz(Me.codigop.Value, 0)
End Sub
filtrar informacion por un campo
Private Sub Comando9_Click()
DoCmd.ApplyFilter , "CODIGOP = 2"
End Sub
No hay comentarios:
Publicar un comentario