Excluir registro de tabela usando VBA

Boa noite,

sou novo e principiante, será que vocês poderiam me ajudar?

Preciso que, ao apertar botão, sejam deletados os valores de uma tabela referente à data. Ou seja, meu banco possui varios dados, com uma coluna
chama Data_Necessidade.

O banco só deve manter os dados referentes a 365 dias passados de hoje. Por exemplo, hoje é 24/07/2017, quero que ele delete os dados menores que 24/07/2016.

Estava utilizando esse código, mas não está dando certo.



Private Sub Comando12_Click()


Dim mydate

mydate = Date()
CurrentDb.Execute "delete * from MyTable Where Data_Necessidade < mydate;"

End sub

Muito obrigado

Olá Guilherme,

Tente assim:

Código:

Dim mydate As Date
mydate = DateAdd("yyyy", -1, Date)
CurrentDb.Execute "delete * from MyTable Where Data_Necessidade < #" & mydate & "#"

Abraço

Qual o sentido de apagar informações?
Não seria melhor manter os dados, o histórico e somente filtrar?