Sveinbjorn El Rojo

Suponiendo que tus tablas las hayas relacionado así : No tendrías que tener ningún problema de ese tipo. Si no has relacionado bien las tablas, ese error te podrían indicar que en una de ellas (por lógica sería Cursos) no tienes el valor que intentas...

Ese código tiene toda la pinta de que lo sacaste de un ejemplo mío de la web de Neckkito (Datos en forms independientes).. jejeje El error lo tienes en el primer código, en el que traes los datos, pues si expediente es numérico en la tabla, no le...

Pocas veces un error da una información tan clara: el problema está en que no encuentra la tabla/consulta que pones como segundo parámetro de la función. Motivos: o bien no existe la tabla/consulta, o no has escrito el nombre de la misma...

Como mínimo te falta un signo = Razon_Social = DLookup("[razon_social]", "[Clientes]", "numero_de_cliente=" & Razon_Social) Ahora bien, habría que analizar tu caso con más calma: ¿Razón social es un campo numérico o de texto? Si fuera de texto, sería...

La solución que te propone Jacinto en buena, pero la puedes reducir a un solo campo adicional, ya sea "fusionando" los tres campos en uno : MesDia:Val(Mes([FechaAlgo]) & Format(Dia([FechaAlgo]);"00")) o más simple: MesDia: Format([FechaAlgo],"mmdd")...

Prueba esta SQL: SELECT TOP 1 Nombre_lab, count (ID_laboratorio) FROM Laboratorio INNER JOIN Medicamento ON Laboratorio.Cod_laboratorio = Medicamento.ID_laboratorio GROUP BY nombre_lab ORDER BY Count(ID_laboratorio) DESC; Te devolverá el nombre del...

Prueba esta SQL para crear la consulta, a ver si te satisface: SELECT TOP 1 Consultas.ID_Consulta, Consultas.Fecha_Tratamiento, Consultas.Hora_Fin FROM Consultas INNER JOIN Reabiertas ON Consultas.ID_Consulta = Reabiertas.ID_Consulta WHERE...

Aparte de lo que te comenta Jacinto (siempre es mejor declarar las variables que no hacerlo), tienes un error de sintaxis, el Me... va fuera de las comillas: mínimo = Format(DMin("[Hora]", "[Registro_conductas_interacción]", "[Id] = " &...

No es exactamente lo que pides, pero a ver si esta solución te satisface: En el evento "Al hacer click" del cuadro de texto que quieres, le generas este código: Private Sub NombreTxt_Click() DoCmd.RunCommand acCmdZoomBox End Sub Un saludo.

Una opción sería que en el evento "Al cargar" de cada uno de los formularios CONSULTA y ESTUDIOS, le generes un código de este estilo: Private Sub Form_Load() Me.IDPaciente=Forms("ENCABEZADO").IdPaciente End Sub Lógicamente, tendrás que tener...