Cadastrar e abrir ficha de cliente

Boa tarde senhores da programação.

Meu caso deve ser simples (para vocês que entendem).
Eu tenho um formulario para cadastrar clientes (Formulario simples na opção de adição de dados (formcadastroclientes)) e outro com a ficha do cliente, no formulario de cadastro tem 3 botões, 1 para cadastrar e sair, outro para cadastrar e ver a ficha do cliente (formclientes, e outro pra cancelar.
A questão é que o botão Cadastrar e ver ficha não esta funcionando, eu coloquei o seguinte codigo...

Private Sub btncadeficha_Click()
Dim P As Long
P = Forms!FormCadastroClientes!Código
DoCmd.OpenForm "FormClientes", , , "Código ='" & P & "'"

End Sub

E esse codigo esta dando erro de tipo de dados incompativel na expressao de criterio. O campo codigo é auto increment, sera que devo declarar a variavel de outra forma?

Agradeco a atencao mestres.

Opa, primeiramente obrigado pela atenção e desculpas pela demora.
Coloquei o código citado e agora ele abre o formulário em branco, me desculpe mas não sou muito experiente nisso ainda.
Oque pode ser agora?

Ele reconheceu o numero no msgbox porem continua a abrir em branco e os nomes estão corretos, oque pode estar acontecendo?