filtrar por rango de fechas con campo "cuenta" en consulta
Publicado por vicente (1 intervención) el 25/10/2018 00:45:10
Hola. nuevamente por esto lares.
La cuestión que me ocupa y que me gustaría me ayudarais es la siguiente:
Tengo un formulario (formulario único) llamado "libros más leídos" con un subformulario (vista predeterminada hoja de datos) llamado "Movimientos Lib más leídos", los cuales son filtrados por un rango de fechas y que funciona bastante bien. No digo que perfecto porque lo que busco es que aparte de filtrar pot fechas también me acumule los registro iguales.
Sigo en el empeño de organizar una biblioteca y lo último que se me ha ocurrido es saber qué títulos han sido los más leídos en un periodo determinado. Lo primero que se me ha ocurrido es utilizar una consulta para que me acumule los títulos iguales y lo hace, pero siempre que no tenga el campo fecha de préstamo. Esta fecha es fundamental porque si no no podría filtrar pop fechas.
Lo que tengo hasta ahora es lo siguiente:
No tengo idea de como continuar y tampoco sé si dejar la consulta con el campo "cuenta" seleccionado o quitarlo.
Agradezco la ayuda.
Un saludo
La cuestión que me ocupa y que me gustaría me ayudarais es la siguiente:
Tengo un formulario (formulario único) llamado "libros más leídos" con un subformulario (vista predeterminada hoja de datos) llamado "Movimientos Lib más leídos", los cuales son filtrados por un rango de fechas y que funciona bastante bien. No digo que perfecto porque lo que busco es que aparte de filtrar pot fechas también me acumule los registro iguales.
Sigo en el empeño de organizar una biblioteca y lo último que se me ha ocurrido es saber qué títulos han sido los más leídos en un periodo determinado. Lo primero que se me ha ocurrido es utilizar una consulta para que me acumule los títulos iguales y lo hace, pero siempre que no tenga el campo fecha de préstamo. Esta fecha es fundamental porque si no no podría filtrar pop fechas.
Lo que tengo hasta ahora es lo siguiente:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private Sub cmdFiltrar_Click()
Dim sFiltro As String
If Me.txtF_inicial > Me.txtF_final Then
MsgBox "LA FECHA INICIAL NO PUEDE SER MAYOR A LA FECHA FINAL", vbInformation, "AVISO"
Me.txtF_inicial.SetFocus
Else
If Not IsNull(txtF_inicial) And Not IsNull(txtF_final) Then
sFiltro = "[Fecha_de_pr?stamo] BETWEEN # " & Format(Me.txtF_inicial, "mm-dd-yyyy") & _
"# AND #" & Format(Me.txtF_final, "mm-dd-yyyy") & "#"
Me.[Subformulario Mov Libros mas leidos].Form.Filter = sFiltro
Me.[Subformulario Mov Libros mas leedos].Form.FilterOn = True
Me.[Subformulario Mov Libros mas leidos].Visible = True
Else
MsgBox "TIENES QUE PONER AMBAS FECHAS, LA INICIAL Y LA FINAL"End If
End If
End Sub
No tengo idea de como continuar y tampoco sé si dejar la consulta con el campo "cuenta" seleccionado o quitarlo.
Agradezco la ayuda.
Un saludo
Valora esta pregunta
0
