[Resolvido]IsNull em SubFormulário para folha de dados....

uso um botão pra abrir um formulário porém quando o SubForm do Formulário de Pesquisa está vazio... ele da erro e não consigo fazer IsNull

Formulário Principal Frm_Pesquisar
SubFormulário SubPesquisar ou Frm_Pesquisar_ChamadosDetalhesSub esse está dentro de SubPesquisar

Código:

If IsNull(Forms!Frm_Pesquisar!SubPesquisar!Codigo) Then
    MsgBox "Selecione um item antes de revisar", vbCritical, "Mensagem"
Else

alguém sabe pq esta´dando erro ?

If (Forms!Frm_Pesquisar!SubPesquisar!Codigo) =" " Then
MsgBox "Selecione um item antes de revisar", vbCritical, "Mensagem"
Else

obrigado!

eu tinha resolvido com Trata_Err

On Error GoTo Trata_Err

dai em vez de da erro aparece a mensagem nao há item para revisar.

mas fica no mesmo obrigado pela ajuda = )