[Resolvido]Consulta Acréscimo inserido dados de um campo de formulário

Olá,

Estou apanhando em uma situação e gostaria do auxilio dos amigos. Segue:

Estou criando uma consulta acréscimo, porém um dos campos de destino quero que seja atualizado com um valor de formulário (este campo não possui na tabela de origem, apenas da tabela de destino).

Já inseri uma coluna colocando a sintaxe abaixo, mas não resolve.

Campo: Expr1: [Formulários]![pedidos_abertos]![venda]
Acrescentar a : id_venda

Nesse formulário pedidos_abertos possui um botão que executar a consulta.

Alguém pode me ajudar?

Caso precise, segue abaixo o SQL

INSERT INTO tbl_saida_produtos ( id_produto, preco_venda, qtd_venda, desconto, subtotal, descricao, total, id_venda )
SELECT tbl_pedido_produtos.id_produto, tbl_pedido_produtos.preco_venda, tbl_pedido_produtos.qtd_venda, tbl_pedido_produtos.desconto, tbl_pedido_produtos.subtotal, tbl_pedido_produtos.descricao, tbl_pedido_produtos.total, [Formulários]![pedidos_abertos]![venda] AS Expr1
FROM tbl_pedido_produtos
WHERE (((tbl_pedido_produtos.id_pedido)=[Formulários]![pedidos_abertos]![pedidos]));

Obrigado pela ajuda.
Att,
Feltz

Boa noite, e bem-vindo ao fórum
Comece a trabalhar em código VBA. É muito mais flexível e ajustável.
Currentdb.execute "INSERT INTO tbl_saida_produtos SELECT id_produto, preco_venda, qtd_venda, desconto, subtotal, descricao, total," & Forms![pedidos_abertos]![venda] & " FROM tbl_pedido_produtos WHERE id_pedido)=" & Forms![pedidos_abertos]![pedidos]

Boa tarde Alexandre,
Obrigado.

Realmente é mais facil via VBA... vou usar este exemplo para outras situações que usei as consultas para executar uma ação.

Porém, creio que fiz algo de errado. Inserir o código que você me passou e gerou o erro abaixo:

Nenhum nome de campo de destino na instrução INSERT INTO (9).

Eu coloquei no evento ao clicar de um botão.

Obrigado pela ajuda
Abraço,

Pois,
Currentdb.execute "INSERT INTO tbl_saida_produtos SELECT id_produto, preco_venda, qtd_venda, desconto, subtotal, descricao, total," & Forms![pedidos_abertos]![venda] & " as id_venda FROM tbl_pedido_produtos WHERE id_pedido)=" & Forms![pedidos_abertos]![pedidos]

Desculpe, mas não consegui.

O gerou um erro devido a um parentese, então o removi.
mas ao clicar o comando não faz a inserção e também não gera nenhum erro agora.

Havemos de acertar
Currentdb.execute "INSERT INTO tbl_saida_produtos SELECT id_produto, preco_venda, qtd_venda, desconto, subtotal, descricao, total," & Forms![pedidos_abertos]![venda] & " as id_venda FROM tbl_pedido_produtos WHERE id_pedido=" & Forms![pedidos_abertos]![pedidos]

Boa noite Alexandre,

Ainda não acontece nada com o código, não gera erro mas não faz nenhuma inclusão.

Deixe eu lhe fazer uma pergunta, me desculpe se ela for leiga.

Depois do comando "Currentdb.execute "INSERT INTO tbl_saida_produtos..." e antes do "SELECT" não deveria ter os campos da tabela  tbl_saida_produtos que iremos inserir?

Mais uma vez obrigado pela atenção.

Abraço
Feltz

Bom dia Alexandre,

O código que você me passou esta correto. Fiz algumas alterações a fim de encontrar o problema e creio que encontrei.

O valor do campo "venda" do formulário é obtido através de uma formula que busca o valor de outro formulário... Eu tirei a formula e inseri manualmente o valor e o código fez a inclusão.

Neste caso eu não posso usar uma formula para buscar o valor?

a formula que inserir é: =[Formulários].[fml_vendas].[id_venda]

Obrigado pela ajuda,

Esse meu banco esta muito esquisito...

As vezes eu abro o formulário e ele executa o código, dai tento novamente ele não faz (sem eu mexer no codigo)...
o que pode ser?

Já compilei, já reparei e compactei

Esta muito estranho...

Alexandre,

Consegui identificar o problema na qual o código não era executado.

o campo id_venda era a chave do formulário e possui relacionamentos com outras tabelas, como o registro ainda não estava salvo, o código não conseguia inserir.

Então inserir um código para salvar o registro antes de executar o comando e funcionou.

Já aproveitei a sua ajuda e consegui adequar o codigo para outras situação que eu usava consultas + ação.

Obrigado pela ajuda,
Abraço,
Feltz

Opa, resolvido.
Obrigado.