[Resolvido]Erro de preenchimento

Boa noite.
Deparei um um imprevisto, e já revisei todo o programa e não encontrei o possível erro.

No Formulario Frm_Membro, ao clicar em pesquisar abre uma segunda tela que ao digitar o nome pesquisado, e encontrando este registro clico e ele preenche os dados no Frm_Membro, porém quando clico no registro ele retorna a um erro, pedindo para digitar valor no campo Tab_membro. Id_Codmembro.

Nesta referida tabela o campo código deixei no formato texto, que será composto de  4 digitos, e os código deste registro se for abaixo de 1000, preenche o código com zero.

Alguém mais experiente para poder ajudar nesta resolução

Olá Roberto, tudo bem?

O erro pode estar aqui:

Código:

Private Sub Form_Load()
    DoCmd.GoToRecord , , acNewRec
    'Me.Id_DataIniMbo = ""
    Me.Id_DataIniMbo.Enabled = False
    Me.Id_DtNascMbo = ""
    'me.Id_PerBlqMbo = ""
    'Me.Id_AtualCad = ""
    Me.Id_AtualCad.Enabled = False
    Me.Id_PerBlqMbo.Enabled = False
    'Me.Cbo_SubGrleitor.Enabled = False
    'Me.Cbo_SubGrpMinistro.Enabled = False
    '-- variável que define a ação do formulário
    iCmd = 0
   
    'Função que bloqueia controles do form ativo
    'Call fnBlockControl(Me)
 

End Sub

Você está indo para um novo registro ao carregar o formulário. Então ele faz as validações de campos obrigatórios, pois está inclusive atribuindo valor
ao campo Id_DtNascMbo (Vazio, mas ainda assim é um valor).

Eu não entendi porque tem uma função para filtrar o formulário dentro dele próprio, uma vez que os filtros podem serem feitos na abertura.

Código:

Public Function CarregaDados(idDados As Integer)

    Me.Filter = "[Id_CodInt] = " & idDados & ""
    Me.FilterOn = True
    Me.Requery

End Function


Esse Me.Requery após a filtragem também fica estranho, uma vez que já está com a filtragem ativa, não é necessário reconsultar
as informações além de que essa função CarregaDados (não sei a sua necessidade) não faz muito sentido, pois já há no access a
possibilidade nativa de filtrar ao abrir, assim como fiz no duplo clique da caixa de listagem.

Fiz algumas alterações:
No evento ao carregar do Frm_Membro, comentei as linhas:
DoCmd.GoToRecord , , acNewRec
Me.Id_DtNascMbo = ""
Pois é elas é que estão dando o problema

No formulário Pesquisa_Membro, alterei o evento duplo clique da caixa de listagem para abrir o formulário Frm_Membro já filtrado, sem necessidade
de usar a função criada de filtragem.

Não entendi porque mantem o formulário Frm_Membro abeto, mesmo sem estar usando, melhor manter fechado e esomente abrir se precisar...

Comentei todos os códigos que julguei desnecessários.

Tente simplificar mais seus códigos, isso será muito útil para futuras manutenções.

Como não conheço a real necessidade, apenas fiz alguns ajustes para servirem com sugestão.

Teste por favor. Baixe aqui.