Espero puedan ayudarme con lo siguiente.
Tengo una hoja en Excel, en la que requiero hacer cierto tipo de filtros.
Criterio 1: Columna A; Contiene fechas y requiero filtrar la fecha más reciente. La fecha esta de esta forma "Mes y Día, ejemplo September 12".
Se como poner Autofiltros con criterios en macro pero con fechas no he podido filtrar la ultima fecha.
Ejemplo de filtro con criterios filtrando el valor 10 de la columna AG que es la No 33:
Sheets("Nombre de la hoja").select
ActiveSheet.Range("$A:$AG").Autofilter Field:=33, Criteria:="">=10" , Operator:=xlAnd
¿Alguna idea, para solo filtrar la ultima fecha?
Estos son mis datos:
Este es tu codigo que agregue a mi Macro:
Sub FechaMax()
Dim FechaMax As Range
Sheets("CalcPromedios").Select
Sheets("CalcPromedios").Activate
With Application.WorksheetFunction
Set FechaMax = Range("A" & .Match(.Max(Range("A:A")), Range("A:A"), 0)) 'cambiar A por la columna que tiene las fechas
End With
ActiveSheet.Range("$A$1:$AG$65536").AutoFilter Field:=1, Criteria1:=FechaMax.Value 'cambiar el área de aplicación y el número de field
Set FechaMax = Nothing
End Sub
Y subi un ejemplo a mi drive: https://drive.google.com/file/d/17UWq1OFkFEodAq0bCkqnwmbEjHDxt6cC/view?usp=sharing
DS