Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo se filtran todas las celdas de fecha antes o después de hoy en Excel?

En este artículo, voy a hablar sobre cómo filtrar todas las celdas de fecha que antes o después de hoy en la hoja de cálculo de Excel.

Filtra todas las celdas de fecha antes o después de hoy con la función de filtro

Filtra todas las celdas de fecha antes o después de hoy con el código VBA


Filtra todas las celdas de fecha antes o después de hoy con la función de filtro


De hecho, la función de Filtro en Excel puede ayudarlo a resolver esta tarea lo más rápido que pueda, por favor haga lo siguiente:

1. Seleccione la columna de fecha que desea filtrar y luego haga clic Información > Filtrar, mira la captura de pantalla:

doc filtro defore hoy 1

2. A continuación, haga clic en la flecha desplegable y luego elija Filtros de fecha > antes de / después como necesites, mira la captura de pantalla:

doc filtro defore hoy 2

3. En la Autofiltro personalizado cuadro de diálogo, haga clic en Selector de fechasdoc filtro defore hoy 3 botón, y luego haga clic Hoy botón en el calendario del selector de fecha, vea screesnhot:

doc filtro defore hoy 4

4. Luego haga clic OK para cerrar el cuadro de diálogo, y todas las fechas anteriores o posteriores a hoy han sido filtradas como se muestra en la siguiente captura de pantalla:

doc filtro defore hoy 5


Filtra todas las celdas de fecha antes o después de hoy con el código VBA

Los siguientes códigos de VBA también pueden ayudarlo a filtrar todas las fechas antes o después del día actual en una hoja de trabajo. Por favor, haz los siguientes pasos:

1. Mantenga presionado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic recuadro > Móduloy pegue uno de los siguientes códigos en Módulo Ventana.

Código VBA: filtra todas las celdas de fecha antes de hoy:

Sub FilterDateBeforeToday()
    Dim xLastRow As Long
    Dim xRg As Range
    On Error Resume Next
    Set xRg = Application.InputBox("Please select filtered column:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    ActiveSheet.AutoFilterMode = False
    If xRg.Count = 1 Then Set xRg = xRg.CurrentRegion
    xRg.AutoFilter 1, "<" & CDbl(Date)
    Application.ScreenUpdating = True
End Sub

Código de VBA: filtra todas las celdas de fecha después de hoy:

Sub FilterDateBeforeToday()
    Dim xLastRow As Long
    Dim xRg As Range
    On Error Resume Next
    Set xRg = Application.InputBox("Please select filtered column:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    ActiveSheet.AutoFilterMode = False
    If xRg.Count = 1 Then Set xRg = xRg.CurrentRegion
    xRg.AutoFilter 1, ">" & CDbl(Date)
    Application.ScreenUpdating = True
End Sub

3. Después de copiar y pegar uno de los códigos anteriores, presione F5 tecla para ejecutar este código, y un recuadro emergente emergerá para recordarle que seleccionó la columna de fecha que desea filtrar, vea la captura de pantalla:

doc filtro defore hoy 6

4. Y luego haz clic OK botón, todas las celdas de fecha que antes o después de hoy serán filtradas inmediatamente.


Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Abhinav Kumar · 8 months ago
    I HAVE DATA in a following format
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10
    12/11/2018 16:10



    and I want to filter it for TODAY - LAST 7 Days Excluding Today , That is if today is 12 Dec I want filter for 12 Dec and December[ 11,10,9,8,7,6,5] .
    How to create custom filter for this in MS Excel