| Pregunta: | 11395 - IMPRIMIR DESDE UN FORMULARIO |
| Autor: | CARLOS SERRANO SANTAMARIA |
| Hola amigos.
He comenzado hace poco a utilizar Access para generar apliaciones caseras. En este preciso instante me encuentro con un pequeño problema que os relato a contonuación: He diseñado un abse MDB con unas tablas importadas, las cuales contiens datos de Clientes, Pedidos, Facturas, Proveedores..etc., todas ellas relacionadas debidamente para poder obtener datos a través de formularios. Me gustaría saber como imprimir una factura (insisto los datos de la factura que yo quiera), diseñada en Word y vinculando los datos a la tabla o consulta correspondiente, desde un Formulario.Espero haber sido sufientemeente claro Muchas gracias de parte de este novato | |
| Respuesta: | Antonio Pérez López |
| Carlos si tuvieras diseñada la factura en Access lo podrias hacer de la siguiente forma que es la que yo utilizo:
En tu formulario debes de tener un botón comando para imprimir registros y en el evento al hacer clic esto: Private Sub Imprimir_Ficha_Click() On Error GoTo Err_Imprimir_Ficha_Click Dim stDocName As String Dim stWhere As String stDocName = "" stWhere = "" stDocName = "Factura" ' GP01NMAT es el nombre del campo de la consulta o tabla ' Me![GP01NMAT] es el nombre del control del formulario SI GP01NMAT FUERA CARACTER PONLO ASI stWhere = "GP01NMAT = '" & Me![GP01NMAT] & "'" SI GP01NMAT FUERA NUMERICO PONLO ASI stWhere = "GP01NMAT = " & Me![GP01NMAT] If Not IsNull(stDocName) And stDocName <> "" Then DoCmd.OpenReport stDocName, acPreview, , stWhere End If Exit_Imprimir_Ficha_Click: Exit Sub Saludos | |