[Resolvido]Data maior e igual

Boa Noite e todos,

Estou fazendo uma consulta por um formulario para gerar um relatório tipo extrato, mas na hora de ele consultar os dos ultimos 15 dias estou tento problemas, gostaria de uma ajuda!

Estou colocando da seguinte maneira:

Código:

Private Sub Ext15days_Click()
Dim NomeFormAbert, Criterio As String
NomeFormAbert = "extrato"
Criterio = "Data = >Date()-15"
DoCmd.OpenReport NomeFormAbert, acViewReport, , Criterio
End Sub

Estou querendo colocar a data maior do que 15 dias atras... essa seria minha consulta

Teria como alguém me ajudar?? O que eu fiz errado??

Qual o problema que esta acontecendo amigo?

Experimente assim:

"[Data] =>Date()-15"

Obrigado!

Deu certo!

O código ficou assim:

Código:

Private Sub Ext15days_Click()
Dim NomeFormAbert, Criterio As String
NomeFormAbert = "extrato"
Criterio = "[Data] >=Date()-15"
DoCmd.OpenReport NomeFormAbert, acViewReport, , Criterio
End Sub

Grato pelo retorno.
Se a duvida foi solucionada por favor marque obtopico como Resolvido!

Ate a proxima se Deus quiser.