Access - Combos combinados

Hola, buenos días

He estado mirando en el foro pero no he podido encontrar el modo de hacer lo siguiente:

Prestaciones (Tabla 1)
Id
CODPREST
DESCRPREST


Tipo Prestaciones (Tabla 2)
Id
CODPREST
CODTIPO
DESCRTIPO

CODPREST de ambas tablas está vinculado de 1 a infinito (referencia integral)

TtosPac (Tabla 3)
Id
Paciente
FechaVisita
Cantidad
DESCRPREST (Busca el dato de la Tabla 1)
DESCRTIPO (Busca el dato de la Tabla 2)

Formulario (origen en la Tabla 3) (igual nombre que la tabla)
DESCRPREST (combo)
DESCRTIPO (combo)
Cantidad

Necesito que al seleccionar del combo DESCRPREST una de las opciones, sólo se me seleccione en el combo DESCRTIPO aquella/s que donde coincide el CODPREST por el que están vinculadas.
He aplicado varias de las cosas que he visto en el foro pero no me funciona ninguna, no sé si será porque entre la Tabla 1 y 2 he establecido una referencia integral de 1 a muchos, o porque la Tabla 3 va a buscar los datos a dos tablas. El caso es que estoy más perdida que Wally y les agradecería me dieran una ayudita.
Gracias y buen día

Hola,

En principio, soy totalmente contraria a realizar vinculaciones en el diseño de la BD, lo único que hacen es "encorsetar" la base de datos y no traen más que problemas. Es mejor hacerlas cuando se necesitan, en una consulta... o dónde sea.

Para los cuadros combinados en cascada, tengo algún ejemplo en la página:

http://angelessebas.es/

en el apartado Supuestos y Solucciones ---> Cuadros combinados ---> Cuadros combinados en cascada.

Me cuentas, saludos Angeles

Hola Angeles
Muchas gracias por contestarme tan rápido.
Ya estuve en tu página hace unos días consultando los cuadros combinados en cascada, pero no me función. Lo que voy a hacer es quitar la vinculación entre las dos primeras tablas y después lo voy a intentar con lo anotabas en tu página.

Ya te cuento, gracias y saludos
Antonia

Hola Angeles,
He quitado las vinculaciones y después apliqué lo que figura para cuadros combinados en cascada de la página que me diste y funciona genial el código.
Pero... me pasaba lo mismo que a otro compañero del foro, es decir, que siempre se me queda en el segundo combo por defecto lo que seleccioné para el combo anterior, así que he aplicado lo siguiente que le aconsejaste:

En Origen de la fila dejé:
SELECT CODPREST, DESCRPREST FROM Prestaciones ORDER BY DESCRPREST;

Y en el procedimiento de evento Al hacer click del último combo "DESCRTIPO" puse:
Me!Refresh
Form.RecordSource = "SELECT from Tipo Prestaciones * WHERE CODPREST ='" & Form!DESCRPREST.Value & "'"
Pero me da error "3141", señalándome que la instrucción SELECT incluye una palabra reservada, falta argumento ...

Gracias de antemano y un saludo

Hola,

Form.RecordSource = "SELECT * from [Tipo Prestaciones] WHERE CODPREST ='" & Form!DESCRPREST.Value & "'"

cuando un nombre de campo, de tabla... etc. tiene espacios en blanco, tiene que ir entre corchetes.

Saludos, Angeles

Hola Angeles,

Ya me dí cuenta de los corchetes y después de cambiarlo seguía igual sin funcionar, pero lo que veo que está diferente es el asterisco delante del FROM que yo lo tengo delante del WHERE.
Lo cambio pero ahora me sale nuevamente sin combinar el contenido de los cuadros.
Lo miraré pero si se te ocurre algo te agradecería me lo comentaras.

Muchas gracias

Hola,

Hay 2 formas de seleccionar los campos de una tabla mediante un SELECT, nombrar los campos (los que necesites) separados por , o poner * (selecciona TODOS los campos de la tabla.

Si no necesitas todos los campos de esa tabla sería más lógico que utilizases unicamente los que van en el formulario. Por ejemplo si se llaman campo1, campo2 y campo3 pondrías:

Select campo1, campo2, campo3 From from [Tipo Prestaciones] WHERE CODPREST ='" & Form!DESCRPREST.Value & "'

Es decir, la instrucción SELECT consta:

SELECT <campos a seleccionar separados por comas o * si los quieres todos>
FROM <tabla de la que quieres seleccionar>
WHERE <condición o condiciones por lo que quieres filtrar>
ORDER BY <campos por los que quieres ordenar separados por ,>

Me cuentas, saludos Angeles

Hola Ángeles estoy intentando ver tus ejemplos en "http://angelessebas.es/" pero el navegador me dice que no encuentra la página.
¿Están en otro lugar?
Gracias.

Los ejemplos posiblemente estén repartidos por la nube, la pagina desaparecería tras un tiempo sin que nadie la actualizase.

SIENTO DECIRTE QUE ANGELES SEBAS YA NO PODRA CONTINUAR ILUSTRANDONOS CON SUS CONOCIMIENTOS
SI mal no recuerdo fallecio hace 2 o tres años ,

tenia en facebook una cuenta llamada APRENDAMOS ACCESS y creo que la gestiona ahora neckkito

Lo siento mucho. DEP.

Mi memoria parece que aproxima los acontecimientos
Ángeles era una gran comunicadora, y siempre de forma altruista.
Desde donde esté, seguro que nos guía en la programación.

Grupo aprendamos acces. En facebook

Bienvenid@. Este es un grupo que intenta enseñar Access y VBA desde un enfoque eminentemente práctico, dando las bases para solucionar los problemas que puedan surgir y para que vosotros os esforcéis en intentar aplicarlas, lo cual a buen seguro fomentará vuestro interés por aprender y aumentará vuestro conocimiento de este gestor de bases de datos.

Grupo creado por Ángeles Sebas, fallecida el 15/09/15. "In Memoriam"