Tenho um formulário com uma combobox dos clientes de uma tabela. Quando seleciono o cliente ele preenche outros campos automaticamente.
Estava tudo funcionando perfeitamente, porém agora eu exclui a tabela dos clientes e troquei por uma outra, sendo que a unica diferença era que a antiga era uma copia e a nova é uma tabela vinculada. Elas são idênticas, mesmo formato, mesmos clientes, renomeei com o nome antigo, e todos os outros formulários que dependem dessa tabela estão funcionando perfeitamente. O único problema é essa combobox, que agora eu seleciono o cliente desejado e ela não preenche os campos que antes preenchia e da essa mensagem de erro:
(anexo)
O problema nao pode ser nos cod, pois como dito, estava funcionando perfeitamente antes, e só para de funcionar quando add essa tb vinculada.
Segue o cod VBA
Private Sub cbo_cliente_BeforeUpdate(Cancel As Integer)
Me.CLIENTE_CONTATO = Me.cbo_cliente.Column(1)
Me.CLIENTE_TELEFONE = Me.cbo_cliente.Column(2)
Me.CLIENTE_NOME = Me.cbo_cliente.Column(3)
End Sub
Obrigado
Estava tudo funcionando perfeitamente, porém agora eu exclui a tabela dos clientes e troquei por uma outra, sendo que a unica diferença era que a antiga era uma copia e a nova é uma tabela vinculada. Elas são idênticas, mesmo formato, mesmos clientes, renomeei com o nome antigo, e todos os outros formulários que dependem dessa tabela estão funcionando perfeitamente. O único problema é essa combobox, que agora eu seleciono o cliente desejado e ela não preenche os campos que antes preenchia e da essa mensagem de erro:
(anexo)
O problema nao pode ser nos cod, pois como dito, estava funcionando perfeitamente antes, e só para de funcionar quando add essa tb vinculada.
Segue o cod VBA
Private Sub cbo_cliente_BeforeUpdate(Cancel As Integer)
Me.CLIENTE_CONTATO = Me.cbo_cliente.Column(1)
Me.CLIENTE_TELEFONE = Me.cbo_cliente.Column(2)
Me.CLIENTE_NOME = Me.cbo_cliente.Column(3)
End Sub
Obrigado