[Nicolas]

Estoy trabajando con VBA y Excel y tengo una tabla con una gran cantidad de información en la hoja de calculo y me preguntaba de qué manera puedo obtener la información de los últimos meses de la misma?

[Nieves Nieto]

Lo ideal sería que tuvieses esos valores en una columna, ahora, teniendo esto podrías realizar un filtro de un filtro con los rangos en los cuales deseas buscar:

Public Sub selectLastMonth()
Dim ws As Worksheet
Dim finicio As Date, ffin As Date
Set ws = ActiveSheet
ws.Range("A:B").Sort key1:=ws.Range("A2"), header:=xlYes
ffin= ws.Range("A1").End(xlDown).Value
finicio = DateSerial(DatePart("yyyy", ffin), DatePart("m", ffin), 1)
ws.Range("A:B").AutoFilter field:=1, Criteria1:=">=" & finicio, Operator:=xlAnd, Criteria2:="<=" & ffin
Set ws = Nothing
End Sub

[Nicolas]

Gracias Nieves, eso era lo que necesitaba