[Resolvido]Dcount com Data associada

Boa tarde,

Estou com um problema na contagem de informação de uma tabela com o critério data.
Eu no meu formulario tenho o seguinte codigo.

Código:

Me.Texto268 = DCount("ID", "Contactos", "[User]='" & Me.User & "' and [DataRegisto]= #" & Format(Me.DataRegisto, "dd-mm-yyyy") & "#") ' contabiliza o contactos
Me.Texto266 = DCount("ID", "tbVendasUser", "[User]='" & Me.User & "' and [DataRegisto]= #" & Format(Me.DataRegisto, "dd-mm-yyyy") & "#") ' contabiliza o Vendas

Acontece que não me está a contar nenhum dado e o mais interessante é que ha alguns dias atras estava...
Se no campo de data puser o dia que pretendo ex(#01-12-2014#) já me aparece a informação.

Alguem me poderia ajudar a entender o erro que estou a cometer?

Obrigado

Ola Avelino,

nao cheguei a testar a sua, mas consegui ultrapassar da seguinte forma:

Código:

Me.Texto268 = DCount("ID", "Contactos", "[User]='" & Me.User _
& "' and [DataRegisto]= Date() ") ' contabiliza o contactos

Obirgado na mesma