[Resolvido]Abrir um novo formulário ligado aos registos de um subformulário

Olá,

Criei uma Base de dados em MS Access para gestão de pedidos.
Tenho um formulário/subformulario que mostra a lista de pedidos de forma resumida, ao clicar no botão "edit" no final de cada registo, abria um novo formulário com o registo selecionado com mais informação.

Estou usando uma "macro" no botão para abrir um novo formulário (OpenForm) com o registo selecionado com a seguinte condição,

Where Condition =[ConsultaPedidos.IDPedido]=[Forms]![ListaPedidos].[Pedido]  

Não consigo perceber o que estou a fazer mal. Podem ajudar.

Obrigado,

Carlos Machado

Olá, bom dia!

Está aparecendo alguma mensagem de erro?

A mensagem é "Enter Parameter Value" ; "Forms!ListaPedidos.Pedido" que aparece após clicar no botão. Ao clicar no botão o valor "Forms!ListaPedidos.Pedido" é perdido, e eu ainda não percebi porque.

Tira um print da mensagem de erro por favor.

Boa tarde,

Anexei um printscreen da mensagem.

Cumprimentos,
Carlos Machado

A expressão que você criou não está passando o valor de parâmetro tente passar só o campo [Pedido]...

tipo Where Condition =[ConsultaPedidos.IDPedido]= [ListaPedidos].[Pedido] ou

Where Condition =[ConsultaPedidos.IDPedido]=[Pedido]

Experimentei as duas sugestões, mas nenhuma funcionou (Ver anexo).
O valor do campo “pedido” ao abrir o novo formulário é perdido.

Olá, bom dia!

Poste o BD por favor... E tente colocar [Id_Pedido].

Sem resultado.
Base de dados segue em anexo.

Carlos

Enquanto estava digitando essa mensagem, enviou o anexo, portanto, eu não vi teu aplicativo,

tive por base tuas imagens.


Com o botão não irá funcionar.

Experimente assim:

Crie essa função na página VBA do subformulário Lista_Pedidos
---------------------------------------
Funtion fAbrePedidoComp ()

DoCmd.OpenForm "Pedido_Completo", acNormal, "", "[IDPedido]= Forms!Gerir_Pedidos!Lista_Pedidos].Form!Pedido "

End Function
------------------

Selecione todas as caixas de texto do subformulário Lista_Pedidos que são visiveis na tela e na propriedade Ao clicar duas vezes coloque:

=fAbrePedidoComp ()

Fazendo isso, todas as caixas terão essa propriedade preenchida com a chamada de função acima.

Isso foi feito para que se possa dar um duplo clique em qualquer campo e com isso abrir o novo formulário.

[ ]'s

Não consigo. Exite algo que não estou a fazer corretamente.
Envio em anexo a BD com as alterações que sugeriu, mas sem resultado.

Obrigado.

Taí o aplicativo modificado

Bom estudo!

[ ]'s

Está a funcionar.
Obrigado Noobezinho e também ao wellingtoneo, pela atenção dispensada.

Disponha segue também outra forma de faze-lo... também com macro.

Mais uma vez obrigado.