Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis

Rango de fechas

  • Autor del tema Autor del tema H-2
  • Fecha de inicio Fecha de inicio

H-2

Member
Registrado
4 Nov 2021
Mensajes
37
Buenas. Tengo una macro para que me filtre en la columna U:U por un rango de fechas, el trimestre anterior al actual, pero como resultado me oculta todas las celdas.

Cuando lo hago manual...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 

Adjuntos

Última edición:
En tu macro original (olvídate de todo lo enviado hasta ahora), tienes:
Código:
Case 1, 2, 3
            primer_dia_trimestre_anterior = DateSerial(Year(fecha_actual) - 1, 10, 1)...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
  • Me gusta
Reacciones: H-2
Y en mi opinión, la forma correcta de arreglarlo sería:
Código:
Sub Filtrar_Trimestre_Anterior()
'
' Filtrar_Trimestre_Anterior Macro
'
' Acceso directo: CTRL+q
'

    ' Aplicar filtro
    If...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Última edición:
O si prefieres, también funciona:
Código:
Sub Filtrar_Trimestre_Anterior()
'
' Filtrar_Trimestre_Anterior Macro
'
' Acceso directo: CTRL+q
'
    ' Aplicar filtro
    If ActiveSheet.FilterMode =...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Última edición:
Es un problema ya descrito:
[URL...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Última edición:
A mi me ha salido esto:
Código:
Sub Filtrar_Trimestre_Anterior()
Dim Desde As Variant, Hasta As Variant, Trimestre As Integer
'--
If ActiveSheet.FilterMode = True Then ActiveSheet.ShowAllData
'--...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Última edición:
Y como me ha gustado el tema y estaba un poco aburrido, ha salido esto otro:
Código:
Sub FiltrarSemestreAnterior()
Dim AT_Ant As Integer, T_Ant As Integer, F_Day As Long, L_Day As Long
T_Ant =...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 

Adjuntos

Última edición:
  • Me gusta
Reacciones: FGV
Volver
Arriba