Estou com um problema que ainda não consegui resolver
Trata-se de inserir valores de uma tabela para uma segunda tabela.
Tenho o campo Cod, Deb, NPrestacao
x = Me.Valor / Me.NParcelas
't = Me.NParcelas
'For L = 1 To t
'C = C + 1
'CurrentDb.Execute "INSERT INTO TbClientesPagamento1 ([CodClientePag],[Deb],[NParcelas]) VALUES(" & Me.CodClientePag.Value & "," _
'& x & "," & C & ")"
'Next
A primeira vez funciona direito, porém quando se repete a ação aparece a seguinte mensagem:
Erro em tempo de execução 3346
Números de valores da consulta e campos de destino não coincidem.
Não sei onde está o erro, pois , uma vez fechado o formulário ele volta a funcionar ( uma única vez)
Preciso de ajuda
Albert
Trata-se de inserir valores de uma tabela para uma segunda tabela.
Tenho o campo Cod, Deb, NPrestacao
x = Me.Valor / Me.NParcelas
't = Me.NParcelas
'For L = 1 To t
'C = C + 1
'CurrentDb.Execute "INSERT INTO TbClientesPagamento1 ([CodClientePag],[Deb],[NParcelas]) VALUES(" & Me.CodClientePag.Value & "," _
'& x & "," & C & ")"
'Next
A primeira vez funciona direito, porém quando se repete a ação aparece a seguinte mensagem:
Erro em tempo de execução 3346
Números de valores da consulta e campos de destino não coincidem.
Não sei onde está o erro, pois , uma vez fechado o formulário ele volta a funcionar ( uma única vez)
Preciso de ajuda
Albert
Última edição por tales em 24/1/2014, 23:28, editado 1 vez(es)