[Resolvido]Criterio invalido

Bom dia a todos !peçoa juda mais uma vez dos amigos do forum !Estou tentando adaptar no meu aplicativo o exemplo de alerta de aniversario do mestre JPaulo! mudei os nomes dos campos na tabela ,o nome da consulta ,mas ele mostra a seguinte msg de erro(tipo de dados imconpatível na expressão de critério)
eis o sql:

SELECT tblClientes.TNome AS Nome, tblClientes.TDataNasc AS [Data Nascimento], DateSerial(Year(Date()),Month([TDataNasc]),Day([TDataNasc])) AS [Parabens Hoje]
FROM tblClientes
GROUP BY tblClientes.TNome, tblClientes.TDataNasc, DateSerial(Year(Date()),Month([TDataNasc]),Day([TDataNasc]))
HAVING (((DateSerial(Year(Date()),Month([TDataNasc]),Day([TDataNasc])))=Date()));
! se alguem puder me ajudar .obrigado

Mudou os nomes dos campos para que nomes ?

Para os nomes dos campos da minha tabela de clientes :ai da esse erro (tipo de dados imconpatível na expressão de critério)
SELECT tblClientes.TNome AS Nome, tblClientes.TDataNasc AS [Data Nascimento], DateSerial(Year(Date()),Month([TDataNasc]),Day([TDataNasc])) AS [Parabens Hoje]
FROM tblClientes
GROUP BY tblClientes.TNome, tblClientes.TDataNasc, DateSerial(Year(Date()),Month([TDataNasc]),Day([TDataNasc]))
HAVING (((DateSerial(Year(Date()),Month([TDataNasc]),Day([TDataNasc])))=Date()));

Ja acrescentei o modulo e o frmexemplo também ;abrir o banco de dados com o frmexemplo ;ele mostra o mesmo erro !

Anexe aqui parte do seu banco, por favor.

Obrigado !!Desculpe ,esqueci de trocar os nomes dos campos nome e aniversario para TNome eTDataNasc da tblclientes no VBA!!!
Corrigido!!!!

Isso acontece porque você tem o campo TDataNasc com registros nulos,

Faça assim na consulta:

Parabens Hoje: SeImed(ÉNulo([TDataNasc]);"00-00-0000";DataSerial(Ano(Data());Mês([TDataNasc]);Dia([TDataNasc])))

Por favor voce poderia me dizer o que seriam registros nulos ?vou testar aqui!!muito obrigado

Resolvido!!meus agredecimentos!

JPaulo Boa noite !Apenas um detalhe !como eu troquei ao abri o BD de dados frmexemplo pelo menu principal,qual seria o camando dentro do modulo ou um comando para abrir o frm menu principal ao clicar no ok da caixa de msg!!!

Ok acresccentei o camnado docmd.opem,e resolvi aqui !!!