** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Recuento de valores de campo distintos
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Recuento de valores de campo distintos

 Responder Responder
Autor
Mensaje
JoseMorales Ver desplegable
Nuevo
Nuevo


Unido: 08/Diciembre/2020
Localización: Badalona
Estado: Sin conexión
Puntos: 6
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita JoseMorales Cita  ResponderRespuesta Enlace directo a este mensaje Tema: Recuento de valores de campo distintos
    Enviado: 19/Junio/2021 a las 12:59
Hola,

he creado un informe y deseo que al pie realice recuentos.

El informe esta basado en una consulta que realiza un filtro en una tabla.

El recuento de las líneas que imprime el informe se realiza, pero quiero también que haga el recuento de los valores distintos de un campo.

He programado una función en VBA, que recuenta perfectamente los valores distintos de una tabla externa, pero no consigo que recuente los campos distintos del informe.


Public Function Contar() As Long

Dim rs As Recordset

Set rs = CurrentDb.OpenRecordset("Select distinct NombreCampo from NombreConsulta")

rs.MoveLast
rs.MoveFirst
'MsgBox rs.RecordCount
Contar = rs.RecordCount
End Function

En NombreConsulta puedo poner una tabla o una consulta, si pongo la consulta en la que se basa el informe me da error, supongo que le tendría que pasar el valor que pongo para el filtro.

La función me funciona, pues si coloco otra consulta que no hace ningún filtro, realiza el recuento que deseo perfectamente.

Gracias de antemano.

Jose Morales.

Arriba
hipromark Ver desplegable
Habitual
Habitual
Avatar

Unido: 18/Julio/2016
Localización: Caracas
Estado: Sin conexión
Puntos: 71
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita hipromark Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 20/Septiembre/2021 a las 03:23
Pues debería funcionarte, si creas un query usando el SELECT DISTINCT, antes de crear el informe, verás que lo hace perfectamente, pero recuerda que los informes tienen varios niveles, como contenido, pie de página y pie de informe, tal vez estás poniendo tu campo en el pie de página en lugar del pie de informe.
Arriba
pitxiku Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 27/Septiembre/2017
Localización: En mi casa
Estado: Sin conexión
Puntos: 1299
Opciones de entrada Opciones de entrada   Gracias (0) Gracias(0)   Cita pitxiku Cita  ResponderRespuesta Enlace directo a este mensaje Enviado: 20/Septiembre/2021 a las 12:55
Otra posibilidad, siempre y cuando se pueda, es crear una agrupación en el informe por el campo que quieres contar. En el encabezado de la agrupación colocas un cuadro de texto cuyo origen de control sea =1, y en su propiedad Suma continua pones el valor Sobre todo. Con esto te ira contando las agrupaciones, y en el pie del informe podrás usarlo para indicar el número.

Cuando veas que todo va bien, puedes ocultar el encabezado de la agrupación si no quieres verla.
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable