[Resolvido]Relacionamento de tabelas pelo código VBA

Bom dia,

Preciso ligar o mesmo campo de uma tabela num relacionamentos um para muitos a outras 02 tabelas, consegui fazer o relacionamento, mas na prática no momento de criar 01 Formulário com 02 subformulários uma das tabelas quando abastecida pelo preenchimento do subform correspondente apresenta os dados, ao meu ver, de forma equivocada.

abraços.

marcos alan.

Boa tarde,

Não indica elementos concretos (nomes de tabelas e nomes e tipo de campos)
O relacionamento será:

'todos os registos da tabela 1 com os registos da tabela 2 correspondentes
SELECT * FROM Tabela1 LEFT JOIN Tabela2 ON Tabela1.CampoX=Tabela2.CampoY ...

'todos os registos da tabela 2 com os registos da tabela 1 correspondentes
SELECT * FROM Tabela1 RIGHT JOIN Tabela2 ON Tabela1.CampoX=Tabela2.CampoY ...

'registos da tabela 1 com os registos da tabela 2 apenas em caso de correspondência
SELECT * FROM Tabela1 INNER JOIN Tabela2 ON Tabela1.CampoX=Tabela2.CampoY ...

Olá Alexandre Neves,

Desculpa por não entender sua orientação, estou descrevendo abaixo as tabelas:

1) TabProcesso:
NumProcesso(ch.prim)=texto)

2) TabCredor:
NumProcesso=texto
Tipo=texto (cx de listagem onde seleciono Cnpj ou CPF)
Cnpj_CPF(Chave primária)=texto
NomeCredor=Caixa texto

3)TabTramitação:
NumProcesso=texto
DataEntrada=data/hora
UnidadeEntrada=texto
DataSaída=data/hora
UnidadeSaída=texto

Assim relacionei os campos (negritos) da seguinte forma: TabProcesso o campo NumProcesso com os campos NumProcesso das outras tabelas (credor e tramitação), isso porque cada Processo normalmente possue mais de 02 credores cadastrados e se movimenta em várias unidades (setores).
Consegui relacionar, porém na construção do form com origem na TabProcesso com 02 subformulários (tblCredor e TblTramitação) ocorrem conflitos. Será que os erros são de relacionamentos por eu estar relacionando o mesmo campo de 01 tabela com duas outras tabelas?

Obrigado.

marcos alan.

Pois é! Eu não faço relacionamentos pelo Access (já foi tempo), faço-os directamente no código.
Experimente este código (veja que tirei os caracteres especiais do nome da tabela):
SELECT * FROM (TabProcesso LEFT JOIN TabCredor ON TabProcesso.NumProcesso=TabCredor.NumProcesso) LEFT JOIN TabTramitacao ON TabProcesso.NumProcesso=TabTramitacao.NumProcesso;

Se num formulário apenas trabalha TabProcesso e TabCredor, utilize:
SELECT * FROM TabProcesso LEFT JOIN TabCredor ON TabProcesso.NumProcesso=TabCredor.NumProcesso;

Se num formulário apenas trabalha TabProcesso e TabTramitacao, utilize:
SELECT * FROM TabProcesso LEFT JOIN TabTramitacao ON TabProcesso.NumProcesso=TabTramitacao.NumProcesso;

Para verificar os resultados, cole os códigos numa nova consulta em vista SQL.

Bom dia Alexandre Neves,

Após pensar e repensar decidi incluir mais 01 tabela, ou melhor, deixei a TblCredor somente com os campos NumProcesso e NomeCredor, e criei a TabCnpjCpf com os demais campos, e como o problema persistia no formXsubform fiz a consulta conforme sua orientação e não entendi o porquê, mas está funcionando muito bem. A consulta era só pra criar as tabelas ou ela tem uma função específica nesse caso?

obrigado.

Abçs.

marcos alan.

Boa noite, marcos

Leia assim:
SELECT * FROM (TabProcesso LEFT JOIN TabCredor ON TabProcesso.NumProcesso=TabCredor.NumProcesso) LEFT JOIN TabTramitacao ON TabProcesso.NumProcesso=TabTramitacao.NumProcesso;
->Seleciona CamposTodos da tabela TabProcesso, junta à esquerda a tabela TabCredor onde o campo TabProcesso.NumProcesso liga-se ao campo TabCredor.NumProcesso e depois junta à esquerda a tabela TabTramitacao onde o campo TabProcesso.NumProcesso liga-se ao campo TabTramitacao.NumProcesso

Ler uma instrução SQL é mais intuitivo que ver as tabelas e as relações.

Se num formulário apenas trabalha TabProcesso e TabCredor, utilize:
SELECT * FROM TabProcesso LEFT JOIN TabCredor ON TabProcesso.NumProcesso=TabCredor.NumProcesso;

Se num formulário apenas trabalha TabProcesso e TabTramitacao, utilize:
SELECT * FROM TabProcesso LEFT JOIN TabTramitacao ON TabProcesso.NumProcesso=TabTramitacao.NumProcesso;

Alexandre Neves, boa noite.

Achei interessante e estou começando a entender a forma intuitiva que você mencionou para a relação entre os campos da tabela. Vou pesquisar mais sobre o assunto na internet, se tiver alguma sugestão de estudo, por favor me avise.

Obrigado!

marcos alan.