[Resolvido]Caixa de combinação não salva os registros

Boa Noite Nobres Colegas!

Estou com um problema em duas caixas de combinação relacionadas, elas estão carregado os dados normalmente, o problema é quando vou salvar os registros no formulário, os dados das caixas de combinação não salvam os registros.
Quem puder dá ajuda eu agradeço.

Segue abaixo um exemplo do meu Bd.

Boas Augusto

Então: Sua caixa de combinação é um campo não acoplado, não direcionado a nada. Então não grava.
Quando voce sai do registro , ele se perde.

Nas propriedades do campo, dados, fonte de controle , selecione o campo da tabela, no caso, CdComprador

Ai ele passa a gravar.

sds

Vamos la. Voce possui duas opcoes:

1 - Determinar a fonte do controle como o colega disse.

2 - Determinar o salvamento via VBA, adaptando o codigo abaixo:


Dim db As DAO.Database
Dim rs As DAO.Recordset

Set db = CurrentDb()
Set rs = db.OpenRecordset("SuaTabela")

rs.AddNew
rs("SeuCampoNaTabela") = Me.SeuCampoNoFormulario
rs.UpDate
rs.Close

Bom Dia !

Agradeço aos colegas Tauron e AErmel, as vezes não enxergamos uma montanha a 1 metro de distância, nessa hora quem está um pouco mais longe consegue ter uma melhor percepção.

havia esquecido de relacionar um dos campos das caixas de combinação a tabela Venda.

Muito grato pelo pronto atendimento.

Senhores...achei o assunto que precisava.
Meu caso é parecido.. lanço notas e preciso que varias informações sejam os mesmos em varios lançamentos. Vi que caixa nao acoplada mantém os últimos valores sem limpar a caixa porem não salva na tabela.. conseguem uma solução ?

Bom dia Emanuel.

Pode postar seu projeto? Assim fica melhor para identificarmos e lhe dar uma melhor ajuda.

Obrigado pelo retorno...segue..

não é nem o projeto em si...mas so material de estudo para entender o processo