[Resolvido]abrir subformulário com base em um valor de uma caixa de combinação

Boa tarde senhores!
Sou novo no forum e no access.
Estou tentando fazer o banco de dados anexo para resolver alguns problemas de controle de material.

Quando seleciono um valor na caixa de combinação do formulário Distri OM um relatório é aberto para conferência do material. Depois disso ao clicar no botão gostaria que outro formulario fosse aberto com o registro correspondente (nome da empresa) selecionado na caixa de combinação, no entanto não estou conseguindo obter êxito no empreendimento.

Conto com a ajuda dos senhores.

obrigado

Boa Tarde....

Qual campo esta relacionado nos dois forms?
se não existir precisa relacionar um campo para pesquisa.

Obs: Ao nomear tabelas, consultas e forms, não deixe espaço.

Ex: frm teste (Errado)
    frm_teste ou frmteste(correto)

e também nos nomes dos campos não deixe espaços e não use nomes próprios do access como exemplo
nome,data etc... use nomenclaturas como txtNome e DtData

Aguardo

Abraços

Bom Dia, td bem?

Gostaríamos de saber se as ajudas prestadas por nós te ajudou a resolver a sua dúvida!!
Caso tenha resolvido, por favor encerre este tópico.
Caso ainda não resolveu, se manifeste para darmos continuidade.

Nota: Reveja todos os tópicos postados por você que permanece em Aberto sem sua manifestação

Isto é muito importante para todos os membros do Fórum e também para futura pesquisas de procura de dúvidas semelhantes.

Aguardamos sua manifestação

Abraços

Bom dia!
Estou fora até o final de setembro por isso não tenho tido tempo de acessar o fórum.

Na verdade as tabelas não estão relacionadas, por essa razão, estou com problemas no BD uma vez que a tabela distribuição já contem mais de mil registros.

Meu problema é o seguinte. Gostaria de selecionar um valor na caixa de combinação e gravá-lo no campo correspondente da tabela distribuição.

Da maneira que arranjei está criando valores em branco na tabela cada vez que eu uso a caixa de combinação. Este foi um arranjo que funciona, mas não está atendendo por causa dos valores em branco criados e isso só acontece porque as tabelas não estão relacionadas.

Como a tabela já possui dados gostaria de pedir ajuda para ver se é possível fazer o que desejo via VBA.
O que quero que seja gravado na tabela distribuição é o nome da organização e não a chave correspondente.

Ok.
Quando voltar de um help para ver se resolvemos a sua duvida

Aguardamos

Boa Tarde Senhores!
Após um tempo fora  estou retornando ao meu velho problema com um formulário de um banco de dados do meu trabalho.

Segue anexo um documento word com uma melhor explicação

obrigado

Olá..

Simplifique seu BD só com as tabelas, consultas e forms envolvidos.

No seu anexo do word voce explica, mas no seu anexo da BD não tem os forms como esta no explicativo
ou se tem não é igual, então deixe só os que interessa para solução.

Aguardo

Boa tarde Celso!

Estou postando uma versão mais simples do BD com as tabelas e formulários envolvidos.

obrigado.

Olá...

Detalhes:

Me descreve com detalhes de onde vem as informações que voce quer gravar na tabela distribuição.

Vejo ex:

id OM - Achei de onde vem
id MC_DC - Não achei
Id Sit - Não achei
Id Disp - Não achei
Número - Não achei
Boletim - Não achei
Observação - Não achei
id divisao - Não achei
distribuicao - Não achei
Doc distribuicao - Não achei
Divisao/CIE - Não achei
Linha Telefonica - Não achei

Ou opções de oque pode servir, mas dando detalhes de onde esta, qual campo e para onde quer que vá

Desculpe, eu tive dificuldade em entender

Aguardo

Boa tarde!
Os Id são as chaves primárias das tabelas.

Os que vc não achou é porque exclui as tabelas que não estão envolvidas no problema.

O que preciso gravar na tabela distribuição é o id OM que vem da tabela OM.

Por exemplo o id 1 representa a entidade A.

Quando o clico no botão distribuição por OM - abre o formulário Distri OM.

Ao selecionar entidade A na caixa de combinação além de abrir um relatório (feche o relatório para ver) no próprio formulário está uma caixa não ativada id OM: 1

Este valor "1" que equivale a entidade A que será gravado na tabela distribuição quando clicar no botão cadastrar inventário.

Talvez a solução seja desenvolver um novo formulário que execute essa função já que este está com "bug". O problema é que não sei fazer isso neste caso, porque a tabela distribuição já contém dados e não está relacionada.

Simplificando preciso fazer o cadastro para a entidade/repartição certa, se eu tirar a origem do controle do formulário atual do "id OM" o cadastro cai em outro registro qualquer.

obrigado.

Olá....

Mas o exemplo que vc me passou esta gravando através de uma macro "inventario" o numero o Id OM quando abre o form.

Se Voce quer alterar para código, então no evento tire a macro e cole este


On Error GoTo Err_Comando16_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Inventario"

stLinkCriteria = "[id OM]=" & Me![id OM]
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Comando16_Click:
Exit Sub

Err_Comando16_Click:
MsgBox Err.Description
Resume Exit_Comando16_Click

Se voce quer completar as informações na qry distribuicao acrescente as tabelas insira os campos que quer completar, como ex: cole esta Sql em nova consulta para voce ter uma idéia

SELECT Distribuicao.id, Distribuicao.[id OM], TABELA_OM.SiglaOM, Inventario.[Nr Inventario], Inventario.Data, Inventario.Protocolo, Distribuicao.[id MC_DC], Distribuicao.[Id Sit], Distribuicao.[Id Disp], Distribuicao.Número, Distribuicao.Boletim, Distribuicao.Observação, Distribuicao.[Divisao/CIE]
FROM Distribuicao INNER JOIN (TABELA_OM INNER JOIN Inventario ON TABELA_OM.id = Inventario.[id OM]) ON Distribuicao.[id OM] = TABELA_OM.id;


Aguardo

Abraços

Bom dia!
Infelizmente o problema não foi resolvido.

Na verdade preciso abrir o formulário inventário com o nome ou id da repartição selecionada na caixa de combinação.

Não estou conseguindo isso.

Existe alguma maneira de relacionar a caixa de combinação com um campo do formulário para que execute de forma correta.

obrigado

Olá...

Eu juro que estou tentando te ajudar, mas não estou entendendo oque pede.

O seu próprio exemplo que postou esta fazendo oque pede.
1- no form Inicial, clico no botão Distribuição por OM e abre o form Distri OM, seleciono a caixa de combinação e seleciono a repartição EX: Teste 1 e fecho o Id OM é mostrado na caixa abaixo com Id 1,
Clico no botão Cadastrar inventário e o Id Om  1 aparece no campo Codigo OM (este é o Id da repartição que esta pedindo)

Não é isto que esta pedindo?  

Veja no seu proprio exemplo no anexo

Aguardo

Abraços

Boa tarde!

Peço desculpas porque também não estou conseguindo expressar o meu problema.

Preciso que o banco de dados faça exatamente o que esses formulários fazem, ou seja preciso selecionar uma repartição na caixa de combinação, ver o que está distribuído para essa repartição e abrir um formulário para registrar alguma coisa para essa repartição.

O problema é que ao manipular o formulário "Distri OM" são criados novos registros na tabela distribuição, com valores preenchidos com zero.

Vc puder manipular o formulário algumas vezes e depois abrir a tabela distribuição verá que vários registro foram criados.

Se vc excluir essas linhas com "zero" e depois manipular o formulário verá que as linhas foram criadas novamente.

Acho que agora consegui descrever o problema real.

Mais uma vez obrigado.

Olá..

Fiz o que sugeriu e não aconteceu oque narrou, não esta gerando lançamentos com zeros,
Fiz 6 lançamentos e estão todos lá.
Sugiro que verifique no seu BD original o que esta diferente do modelo que postou e corrigi los
Veja as imagens abaixo:

Aguardo sua posição

Abraços

Boa noite!

Está gerando zeros em id_MC_DC, id_Sit e id_disp.

Muito embora possa haver um problema de estrutura no formulário, este erro é gerado principalmente pela falta de relacionamento entre as tabelas.

Como esse final de semana tive um tempo, consegui exportar a tabela para o excel, relacionar as tabelas no access, corrigir algum erro no excel e mandar para o access de novo.

Dessa forma o erro foi corrigido.

De toda forma agradeço a sua disponibilidade em tentar ajudar.

Obrigado, sempre

O problema foi resolvido no momento que as tabelas foram relacionadas corretamente.

Olá..

Desculpe não ter te ajudado corretamente, fico feliz por ter encontrado a solução.

O fórum agradece seu retorno

Abraços

Eu e que agradeço Celso.

Este fórum é de grande valia para iniciantes como eu.

obrigado