[Resolvido]Problema com formato de data

Bom dia, meus caros

Estou com um problema com o formato de datas no VBA. Por exemplo, se hoje é 11/03/2017 e uso como critério DateAdd("m",-18,Date), o retorno seria 11/09/2015. Porém, essa data precisa estar no formato americano ("mm/dd/yyyy" - 09/11/2015) para que o VBA entenda que é 11/09/2015. Então usei a propriedade Format:

DateAdd("m",-18,Format(Date,"mm/dd/yyyy"))

Porém o resultado é 03/05/2016; no formato brasileiro seria 05/03/2016.


Grato pela ajuda.

Boa tarde Teste assim

DateAdd("m", -18, Format(Date, "dd/mm/yyyy"))

Olá a todos,
Veja se é isso:
Format(DateAdd("m", -18, Date), "mm/dd/yyyy")
Abraço

Obrigado, pessoal, mas não funcionou.

ahteixeira, deu erro de compilação: Era esperado: expressão.

Assis, nesse caso não funciona porque preciso dessa data como filtro no formulário.

Por exemplo, meu código seria esse: DoCmd.ApplyFilter , "inicio<#" & DateAdd("m", -18, Format(Date, "mm/dd/yyyy")) & "#"

Nesse caso, aplicando o formato correto, no filtro do formulário a data correta seria inicio<#09/11/2015 (11/09/2015 no formato brasileiro), mas só retorna inicio<#03/05/2016#.

Quer postar o seu exemplo e dar os detalhes completos

Claro, segue o BD.

Nas propriedades do formulário observem o filtro depois de clicar em Ok.

Olá a todos,
Teste assim no botão:
DoCmd.ApplyFilter , "inicio < #" & Format(DateAdd("m", -18, Date), "mm/dd/yyyy") & "#"
Abraço

Funcionou

ahteixeira, a sua primeira resposta estava correta, eu que não observei o Format no início. Perfeito.

Muito obrigado, Assis pela ajuda.

Olá a todos,
Jonatan, sim, mas ao colocar o exmplo facilita para se compreender melhor.
Obrigado pelo retorno.
Abraço a todos