[Resolvido]Preencher Caixa de Combinação em função de seleção feita em outra Caixa de Combinação

Prezados,

Estou desenvolvendo um BD Access 2016 para vendas de uma Livraria. A Livraria está dividida em Sessões (p/ex: 1. Livros Novos, 2. Livros Usados, 3. Assessórios).

A Tabela “Sessões” (CodSessão, Sessão) tem relação 1 - ꝏ (pelo campo CodSessão) com a Tabela “Estoque” (Código, CodSessão, Título, Autor, etc.), que contém toda a lista de produtos em estoque, para serem vendidos.

Um Formulário “Vendas” contém um SubFormulário “DetalheVendas”. Neste último existem duas Caixas de Combinação nomeadas “CodSessão” e “Código”.

Gostaria que quando um vendedor selecionasse, na Caixa de Combinação “CodSessão”, uma Sessão específica (p/ex: 1. Livros Novos) a segunda Caixa de Combinação “Código” mostrasse apenas as opções de “Código” dos produtos classificados na Tabela “Estoque” como “CodSessão = 1”, ou seja, apenas os Livros Novos, em vez de todos os registros da Tabela “Estoque”.

Na aba “Dados” da “Folha de Propriedades” do Campo “Código” do SubFormulário “DetalheVendas”, os dados mostrados nessa Caixa de Combinação (“Código”), tem como “Fonte do Controle” o campo “Código” e como “Origem da Linha” uma Consulta que seleciona todos os registros da Tabela “Estoque”. Gostaria que essa Consulta selecionasse apenas os registros com o “CodSessão” previamente escolhido na primeira Caixa de Combinação (“CodSessão”).

Resumindo, o problema é preencher os dados de uma Caixa de Combinação em função do item selecionado previamente em uma outra Caixa de Combinação.

Obrigado.

amigo verifica se esse tópico resolve, modifique a consulta para necessidade da sua aplicação

https://www.maximoaccess.com/t36574-resolvidoconsulta-baseado-em-textbox-3-condicoes

Prezado Alozs,

Agradeço a ajuda, mas ainda não consegui, com a dica que você me enviou, resolver a questão.

Quando coloco uma expressão, utilizando a função IIf (semelhante à expressão da Consulta que você me enviou), como critério para selecionar apenas os registros que contenham o valor selecionado no campo CodSessão do subformulário "DetalheVendas", o Access considera que um parâmetro de consulta deve ser fornecido e pede o parâmetro "DetalheVenda.CodSessão", em vez de pegar o valor que o usuário acabou de selecionar na primeira Caixa de Combinação.

Obrigado, e bom Ano Novo!

Amigo, estou enviando um exemplo para sua apreciação. Espero que ajude.

ajustei pra vc o banco de dados (retirei as chaves primárias e coloquei um campo com o valor total calculado) e retirei o formulário adicional para incluir produtos, agora está tudo em uma tela, só precisa tratar os erros e incluir os botoes de nova venda e etc

Prezado renpv,

A solução que você me enviou (BD filtrarComboBox) resolveu o problema que postei no forum. O único bug observado é que o botão 'Incluir' do formulário 'forIncluirItemVenda' não está atualizando a tabela VendasDetalhes na primeira vez que é acionado em uma nova Venda. Se repetirmos o processo com o botão 'IncluirItem' o botão 'Incluir' atualiza normalmente. Não consegui ver no código VBA o que pode causar o problema (Mas sou Novato entre Novatos nesse assunto).

Obrigado pela ajuda. Se conseguir entender o problema que relatei, agradeço auxílio adicional. Vou manter o Tópico em aberto ainda um curto espaço de tempo.

Boa noite, alozs,

Só agora baixei e testei o BD "filtrarComboBox" que você disponibilizou (tem o mesmo nome e objetos bem semelhantes ao do BD enviado pelo colega renpv). Me pareceu que resolve o problema inicial de ComboBox com dados filtrados por outra ComboBox, além de eliminar o bug da versão anterior que recebi, que não gravava os registros em vendasDetalhes na primeira vez que o botão "Incluir" era acionado (para uma nova Venda). Amanhã vou adaptar a sua versão de solução no BD Access da Livraria, que estou desenvolvendo. Também achei interessante resolver tudo numa tela única.

Informarei assim que tiver adaptado a solução (sou lento, devido ao meu estágio de iniciante em desenvolvimento no Access).

Abraços

Boa tarde colegas alozs e renpv,

Com o inestimável auxílio de vocês, consegui resolver o problema origem deste Tópico. O sistema de vendas de Livraria que estou desenvolvendo deu um enorme passo à frente, pois solucionou o seu núcleo funcional. Resta aprimorar os controles e consultas/relatórios mais úteis na sua primeira versão.

Agradeço a vocês e a este Forum a que me associei recentemente pelo trabalho colaborativo do desenvolvimento em Access. Muito obrigado!

Estou colocando o Tópico como "resolvido".

Tópico resolvido, Obrigado a todos.