Calcular moda en access

Tengo un problema trabajo con excel pero me pidieron hacer una consulta en access y lo que me pidan es por ejemplo tengo una base de todos parecida a esta
campo1 campo2 campo3 campo4
1 2 3 A
1 2 3 B
1 2 3 A
3 1 2 A
3 1 2 C
3 1 2 C
Donde tengo que juntar mi campo 1,2,3 para crear un registro único( en eso no hay problema) pero lo que ya no pude es sacar elvalor que más se repita de mi campo4 y todo tiene que estar agrupodo con forme a mi registro único de tal forma que se tiene que ver algo así
campo1 campo2 campo3 campo4
1 2 3 A
3                  1            2                 C            
me trabe al sacar la moda de mi campo 4 pues todo tiene que estar agrupado
les agradesco su ayuda desde ya
esto es lo que llevo de codigo
SELECT TOP 1 Campo4
FROM [SELECT DISTINCT Campo4, COUNT(Campo4) FROM   tabla                             GROUP BY campo4 ORDER BY COUNT(campo4) DEsc]
Esto me saca el valor que más repite pero no se como calcularlo con respecto a mis datos que agrupo...

2 Respuestas

Respuesta
1
Prueba este código:
SELECT TOP 1 tabla.campo1, tabla.campo2, tabla.campo3, tabla.campo4, Count(*) AS numeroRepeticiones
FROM tabla
GROUP BY tabla.campo1, tabla.campo2, tabla.campo3, tabla.campo4
ORDER BY Count(tabla.campo4) DESC;
Creo que es el que buscas.
Respuesta
1
Yo haría primero una consulta así:
SELECT Tabla1.Campo1, Tabla1.Campo2, Tabla1.Campo3, Tabla1.Campo4, DCount("Campo4","tabla1","Campo1=" & [Campo1] & " AND Campo2=" & [Campo2] & " AND Campo3=" & [Campo3] & " AND Campo4='" & [Campo4] & "'") AS ContarCampo4
FROM Tabla1
GROUP BY Tabla1.Campo1, Tabla1.Campo2, Tabla1.Campo3, Tabla1.Campo4, DCount("Campo4","tabla1","Campo1=" & [Campo1] & " AND Campo2=" & [Campo2] & " AND Campo3=" & [Campo3] & " AND Campo4='" & [Campo4] & "'");
Llamad por ejemplo: ConsultaAux
Luego otra:
SELECT ConsultaAux.Campo1, ConsultaAux.Campo2, ConsultaAux.Campo3, Max(ConsultaAux.ContarCampo4) AS MáxDeContarCampo4
FROM ConsultaAux
GROUP BY ConsultaAux.Campo1, ConsultaAux.Campo2, ConsultaAux.Campo3;
Llamada: consultaAux2.
Y la final:
SELECT ConsultaAux.Campo1, ConsultaAux.Campo2, ConsultaAux.Campo3, ConsultaAux.Campo4, ConsultaAux.ContarCampo4
FROM ConsultaAux INNER JOIN ConsultaAux2 ON (ConsultaAux.ContarCampo4 = ConsultaAux2.MáxDeContarCampo4) AND (ConsultaAux.Campo3 = ConsultaAux2.Campo3) AND (ConsultaAux.Campo2 = ConsultaAux2.Campo2) AND (ConsultaAux.Campo1 = ConsultaAux2.Campo1);
Seguro que hay una forma más fácil de hacerlo. Por supuesto con VBA. Pero esto, con SQL, funciona.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Registros repetidos con 3 capos iguales

Antes que nada, y ahora a preguntar mi caso es que quiero sacar registros repetidos eso lo se hace hacer, pero se me complica porque no solo necesito mostrar los registros repetidos, también debo visualizar aquellos en los que ciertos campos son...
1 respuesta

Consulta con operador IN

Tengo una pregunta y ojala me puedas ayudar a resolverla, estoy elaborando una consulta a la bd que elabore pero cuando quiero obtener los resultados de dos registros en especifico no me sale. Ejemplo: Si elaboro la siguiente consulta me salen 20 reg...
2 respuestas

Problemas SQL

Que tal disculpa que te de tanta lata, pero ando hecha pelotas con esto del SQL, estoy tratando de hacer una consulta de 4 tablas, estoy tratando de hacer una especia de tabla de movimientos de cada código, donde tengo que mostrar la fecha de ingreso...
1 respuesta

¿Promedio de los datos de un subformulario?

Estoy aprendiendo a Access y me he creado una pequeña base de datos para gestionar una academia. Para ello tengo tres tablas (alumnos, cursos y matricula). En alumnos tengo dos campos (idAlumno, nombre). En cursos tengo dos campos (idCurso,...
1 respuesta

Importación de tablas

Oscar mi pregunta es, tengo un formulario que me permite importar tablas que uso en otros formularios que ya existen, la idea es que al importar la tabla me reemplace la existente y no me la renombre, ¿Se puede hacer esto en access?
1 respuesta

Numerar Registro en Tabla

Tengo una Tabla así: Campo1 Campo2 Campo3 Orden 1 3 4 1 3 4 1 3 4 2 3 1 2 3 1 2 3 1 Lo que quiero es que en Orden me quede así: Campo1 Campo2 Campo3 Orden 1 3 4 1 1 3 4 2 1 3 4 3 2 3 1 1 2 3 1 2 2 3 1 3 Y así sucesivamente, ya lo había hecho hace...
1 respuesta

Consulta de actualización con valores nulos

Mi problema es el sig. Espero me pueda ayudar. Por medio de un formulario lleno datos en la primera fila de una tabla, con la que hago un informe, luego al necesitar otro informe hago correr una consulta de actualización para sustituir los valores de...
2 respuestas

Contar valor en mas de un campo según condición

Necesito contar el valor (1) que se encuentra en dos campos y que cumpla la condición de otra tabla, ejemplo: tabla_1 tabla_2 id,campo1,campo2 id,campo1 1 1 0 1 joaquin 2 1 1 2 joaquin 3 0 1 3 valentina Estoy efectuando la sigiuiente consulta: select...
1 respuesta

Access mensaje antes de elimin registro en fórmula

Espero que me puedas ayudar con un tema en el que ando un poco bloqueado y no se como hacerlo. Tengo la siguiente tabla: Tabla1: Registo Campo1 Campo2.. 1 Juan 2 Luis Juan 3 Pedro Juan 4 Ramón Pedro Tengo un formulario en el que me aparecen todos...
1 respuesta

Problema al acceder por VBA a una select

Tengo un problema con el siguiente código: Public Function funcion1(variable) Dim RS As Recordset Dim SQL As String Set DB = CurrentDb SQL = "SELECT tabla1.campo1 FROM tabla1 WHERE (((tabla1.campo2)=[variable])) ORDER BY tabla1.campo1" Set RS =...
1 respuesta