[Resolvido]Dúvidas no código VBA no botão de localizar no formulário

Bom dia a todos, eu preciso muito da ajuda dos amigos, eu criei um banco de dados de controle de pastas de clientes, a questão é que não sei aonde está o erro na execução no botão localizar registro no meu formulário chamado"frmcsDadosClientes" no qual ele abre um outro formulário "frmPesquisaNome". Eu havia utilizado um código vba, que daria a oportunidade de clicar no nome do formulário frmPesquisaNome, e automaticamente remeteria ao registro do formulário frmcsDadosClientes, eu usei esse código:  

DoCmd.OpenForm "frmcsDadosClientes", acNormal, "", "[CodCliente]=[forms]![frmPesquisaNome]", , acNormal
DoCmd.Close acForm, "frmPesquisaNome"

Eu não sei o que esta havendo, pois quando eu clico no nome no formulário pesquisaNome, ele retorna ao formulário frmcsDadosClientes em branco, já refiz de várias maneiras e não cheguei a um resultado satisfatório.

o arquivo é esse dropbox.com/s/ws1pt7zn6215i01/Clientes.accdb?dl=0

Olá Angelo,
Não é permitido links externos.
Retirei o htt.. , assim funciona com copiar e colar diretamente no browser.
Também coloquei como anexo.
Abraço e bons estudos com o MaximoAccess

Olá, respondendo à questão, acontece porque você está aplicar um filtro.
Abraço

Obrigado pela dica meu amigo, eu não me atentei pra isso, e quanto ao anexar o arquivo, eu não consegui mandar pelo outro modo.

Olá Angelo Araujo,
Teste, alterando conforme código abaixo:

No formulário frmCsDadosClientes no botão localizar:

Código:

Private Sub btnLocalizar_Click()
    DoCmd.OpenForm "frmPesquisaNome"
End Sub

No formulário FrmPesquisaNome no evento Click da lista:

Código:

Private Sub lstpesquisa_Click()
    'Alvaro Teixeira (ahteixeira) 2016 - MaximoAccess
    
    'esconde forumlario da pesquisa
    DoCmd.OpenForm Me.Name, , , , , acHidden
    
    'passa foco para formulario
    Forms("frmCsDadosClientes").SetFocus
    
    'passa foco para campo a pesquisar
    Forms("frmCsDadosClientes").CodCliente.SetFocus
    
    'faz a pesquisa
    DoCmd.FindRecord lstpesquisa, acEntire, False, , False, acCurrent, True
    
    'fechar formulario pesquisa
    DoCmd.Close acForm, Me.Name
End Sub

Espero que seja o que pretende.
Abraço

Bom dia meu caro, a sua dica foi muito valiosa, pois funcionou muito mais do que eu esperava. Muito Obrigado. Abraços.

Olá Angelo, fico feliz por ter ajudado.
Obrigado pelo retorno.
Abraço