[Resolvido]Troca de mês por dia no WHERE...

Caros colegas, esta WHERE esta transformando 01/12/2013 em 12 de janeiro de 2013.
Como faço para corrigir esta troca de mês por dia na variável DtSalBruStart? Já tentei várias inversões.
Agradeço desde já!
MPS

Dim DtSalBruStart As Date
DtSalBruStart = DateValue(1 & "/" & LtMesStart.Value & "/" & Year(Date))
DtSalBruStart = Format(DtSalBruStart, "dd/mm/yyyy")

CurrentDb.Execute "UPDATE movimentacao " & "SET salbrutovalores = 0 " _
& "WHERE [mesreferencia] >" & DtSalBruStart & "And [salbrutovalores] >0;"

Bom dia Mp5

Caros colegas, esta WHERE esta transformando 01/12/2013 em 12 de janeiro de 2013.
Como faço para corrigir esta troca de mês por dia na variável DtSalBruStart? Já tentei várias inversões.
Agradeço desde já!
MPS
Verifique suas configurações de campo na tabela, quando a tipo de dados

Dim DtSalBruStart As Date
DtSalBruStart = CDate(1 & "/" & LtMesStart.Value & "/" & Year(Date))
DtSalBruStart = Format(DtSalBruStart, "dd/mm/yyyy")

CurrentDb.Execute "UPDATE movimentacao " & "SET salbrutovalores = 0 " _
& "WHERE [mesreferencia] >" & DtSalBruStart & "And [salbrutovalores] >0;"

Cumprimentos.

Piloto, obrigado pela resposta!
Não funcionou!
Tentei inverter a ordem do mês e dia no CDate, porém também não funcionou!
At
MPS

Ola Marcio;

De onde vem este valor e qual o valor que está lá ?

LtMesStart.Value

Teste sem o .Value no LtMesStart e formatando para data americana;

Dim DtSalBruStart As Date
DtSalBruStart = 1 & "/" & LtMesStart & "/" & Year(Date)
DtSalBruStart = format(DtSalBruStart, "mm/dd/yyyy")

Upsss Avelino desculpe ae, por um (1) segundo.

Caros Avelino e JPaulo, obrigado pela atenção!
Não consegui, mesmo diante da ajuda de vocês!
Tomei a liberade de postar o BD.
Perceba que uma vez escolhido o mês 11 a lógica seria zerar somente os valores do mês 11/2013 e 12/2013. E não todos os demais!
Agradeço desde já!
MPS

Poste em 2007 se possível.

Cumprimentos.

Caro Pioloto, segue em versão anterior!

Rapaz isto é impossível de dar certo desta forma....

Se tivesse observado na minha primeira dica, ja teria descoberto a origem do problema, veja o que falei:

Bom dia Mp5

Caros colegas, esta WHERE esta transformando 01/12/2013 em 12 de janeiro de 2013.
Como faço para corrigir esta troca de mês por dia na variável DtSalBruStart? Já tentei várias inversões.
Agradeço desde já!
MPS
Verifique suas configurações de campo na tabela, quando a tipo de dados

Dim DtSalBruStart As Date
DtSalBruStart = CDate(1 & "/" & LtMesStart.Value & "/" & Year(Date))
DtSalBruStart = Format(DtSalBruStart, "dd/mm/yyyy")

CurrentDb.Execute "UPDATE movimentacao " & "SET salbrutovalores = 0 " _
& "WHERE [mesreferencia] >" & DtSalBruStart & "And [salbrutovalores] >0;"

Observaste a configuração do seu campo: MesReferencia?

O formato deste campo na tabela está como: mm/yyyy

Como voce compara uma data completa com uma data em formato Mes e Ano??????


Ai não dá amigão.


Cumprimentos.

Bom dia Meste Avelino, eu não havia postado a solução pois esperava que ele tentasse antes...

Mas é isso ai mesmo.

Obrigado.

Caro Piloto, você tem razão!
Eu deveria ter focado mais nesta questão da formatação da data!
Caro Avelino, obrigado, esta ultima programação é perfeita. Este tipo de formatação eu ainda não havia encontrado nos livros!
At
MPS

O Fórum afradece o Retorno.