[Resolvido]Salvar registro formulário contínuo

Bom dia Galera,

Seguinte, estou quebrando a cabeça em um formulário contínuo.

Eu tenho um formulário principal onde executa um filtro e carrega uma lista em um subformulário.
Nesse subformulário eu quero inserir um valor para cada linha (quantidade) e esse campo não seria acoplado.

Ele será inserido um uma tabela.

Como solução eu coloquei um botão onde executa uma consulta foi inserção, ele insere o primeiro campo e repete isso em todos os registros.

Se eu colocar um campo nao acoplado ao inserir ele repete em todas as linhas.. Então nao tenho ideia com resolver isso.

Posta seu Exemplo por favor... para facilitar o Entendimento.

Quando eu clico eu estou fazendo esse procedimento.
Ele esta repetindo o primeiro campo em todos os registros..

Código:


Private Sub Comando118_Click()
    Dim db As DAO.Database
    Dim rst As DAO.Recordset
On Error Resume Next


    Set rst = CurrentDb.OpenRecordset("Select * from csSubKitBaixa where codRelKitTab = 5")
    rst.MoveLast: rst.MoveFirst

  Do While Not rst.EOF

                CurrentDb.Execute "INSERT INTO[tbCalculosQuantidades](codCalculoAdesivo, codAdesivo, quantidade) VALUES('" & Me.codAdesivo & "', '" & Me.parcial1 & "', 1);"
                rst.MoveNext
 Loop
    rst.Close
    Set rst = Nothing

MsgBox "Registro adicionado com sucesso...", vbInformation
End Sub


Amigo, Formulário continuo, é o mesmo Campo porem repetido varias vezes de acordo com a quantidade de Linhas. Dessa forma se seu Campo nao está acoplado (nao vinculado a um campo na tabela), o mesmo valor que vc colocar no Primeiro Registro, este se repetirá em todos os Outros, pois o mesmo não está vinculado a Tabela. A solução seria Vincular esse campo a uma Tabela Temporária, onde apos a Inserção dos dados, essa tabela seria excluida. Veja algo parecido com sua Duvida aqui:

https://www.maximoaccess.com/t26701-resolvidoinsert-into-usando-form-principal-e-sub#188767

ótima solução.