Tentando alterar isso para que apenas registros fora do ano atual sejam excluídos. Anteriormente, eu estava trabalhando em um intervalo contínuo de 12 meses para provar o conceito, agora preciso manter apenas os dados do ano atual. Tentei algumas maneiras diferentes, mas não consigo descobrir, não quero entrar em todos os meses e alterar a contagem de meses em 1. Existe uma maneira de dizer se a data cair fora de 2025, remova-a
exemplo de formato de data em dados 13/09/2024 16:35:16
código usado anteriormente
Sub Delete_Rows() 'DELETE HISTORICAL DATA OVER 1 YEAR OLD
With Sheets("HistoricalData")
lr = .Cells(Rows.Count, "C").End(xlUp).Row
For i = lr To 2 Step -1
If CDate(.Cells(i, "C").Value) < DateAdd("m", -12, Date) Then 'SETS THE MONTH COUNT TO MORE THAN 12 MONTHS OLD
.Rows(i).EntireRow.Delete ' DELETES ROW
End If
Next i
End With
End Sub