Formulario Varias Tablas Access

Crea una consulta en la que añades todos los campos de las 4 tablas (menos el numero de factura, que llega con que lo hagas una vez), y luego crea el formulario sobre esa consulta.

Muchas gracias por tu respuesta pero creo que no me he explicado correctamente, la consulta añadiendo todos los campos la he realizado y como tengo hechas las relaciones entre las tablas en dicha consulta si me trae todos los registros relacionados a cada factura, pero si por ejemplo tengo 1000 facturas me traería la información de todas en 1000 filas.

Lo que necesito es que me salga esa consulta en un formulario pero que yo pueda escribir el numero de factura que deseo consultar y sólo me muestre la información relacionada en las cuatro tablas para esa factura en particular.

Te agradezco tu tiempo y la explicación con que me puedas ayudar.

Saludos,

Pepe

No te había entendido del todo, disculpa.

Para que te filtre la consulta por el valor que tienes en el campo de texto del formulario, abre la consulta en vista diseño, vete a la columna número de factura y en criterios le pones:

Formularios![NombreDeTuConsulta]![NombreDelCampoDeTexto]

Cambia lo que está en negrita por los nombres que tu tengas.

Esto también lo puedes hacer si en la fila de criterios le das click derecho del ratón->Generar. Te saldrá un asistente en el que tienes que buscar el formulario en cuestión, seleccionar el cuadro de texto y darle a aceptar.

Esta solución te sirve si el botón de tu formulario abre la consulta en una nueva ventana.

Si tu formulario al abrirlo te muestra en el todas las facturas, lo que tienes que hacer es un filtro:

El código del botón para filtrar sería:

Private Sub...

Dim miFiltro as String

Dim miFactura as String

If IsNull(Me.CuadrodeTexto) Then Exit Sub 'Si está vacío, no filtra

miFactura=Me.CuadrodeTexto.Value

miFiltro="[NombredelCampoNumeroFactura]='" & miFactura & "'"

Me.Filter=miFiltro

Me.FilterOn=True

End Sub

Esto si el campo numero de factura lo tienes como texto. Si fuera numero, tendrías que poner:

Dim miFactura as long

miFiltro="[NombredelCampoNumeroFactura]=" & miFactura

Si quieres un botón para quitar el filtro le pones este código: Me.FilterOn=False

Igual que antes, cambia lo que está en negrita por los nombres que tu tengas

Ok, muchísimas gracias es exactamente lo que necesitaba, eres un As.

Saludos