[Resolvido]Critérios em Consulta Baseada em um Formulário

Boa tarde Senhores!

Vou te explicar a minha necessidade e ver se alguém pode me dar um dica.
Tenho uma consulta de despesas do mês que vem de algumas tabelas, porém o campos são basicamente os seguintes:

Data
Centro de Custo
Descrição
Valor R$

O que necessito é o seguinte, criar um formulário aonde eu coloco a data inicial e data final, e abaixo coloco uma caixa de opção e clico quais são os centros de custos que irão aparecer nesse relatório.
Se alguém souber de algum artigo parecido sobre esse assunto e me mandar o link para que eu possa estudar, ou mesmo uma linha de raciocínio para que eu possa seguir e pesquisar, agradeceria.

Obrigado.

Faça um teste:

Crie o formulario "filtro" com os campos em questao (datainicial, datafinal e centrodecustos) nao acoplados.

no caso do campo centro de custos (caixa de combinacao) proceda normalmente referente a "origem da linha"

pode colocar um botao para "chamar" o relatorio e com codigo simples de: docmd.openreport "seurelatorio", acviewpreview


na consulta origem de dados do relatorio coloque:

Campo Data: entre [formularios]![filtro]![datainical] e [formularios]![filtro]![datafinal]

campo Centro de Custos: [formularios]![filtro]![centrodecustos]

Boa noite!!!
Professor Tauron

Primeiro quero agradecer por tentar me ajudar, e depois pedir desculpas pelo demora em responder.
Amigo da forma como colocou eu consigo somente filtrar um único centro de custo, por isso que coloquei ao invés de uma caixa de combinação, colocar várias caixas de seleção, aonde eu clico em quais centros de custos eu quero que apareça no meu relatório.
Não se existe um código para isso se o amigo souber me responder lhe agradeço ou me passe um link aonde possa estudar.

Obrigado.

Bom dia
Já procurou no fórum? Existem vários temas resolvidos sobre combo em cascata.

Bom dia !!!
Alexandre Neves.

Procurei sobre o combo cascata e não encontrei nada que eu pudesse estudar para resolver o meu problema, o amigo teria algum link para que eu pudesse dar uma olhada, pois tudo que encontrei foi:
Preencher uma Caixa de Listagem
Preencher uma Caixa de Combinação

E outros tudo dentro de um formulário e de acordo com a minha necessidade eu preciso criar um código dentro de uma consulta ou até que fosse dentro de um formulário para que filtrasse somente os centro de custos que desejasse imprimir, é como se montasse o relatório eu desejo habilitar dos 10 centros de custos, somente 07 por exemplo, e o relatório apresentasse somente os 07 escolhidos.

Desde já agradeço, pela ajuda.

Obrigado.

Veja
https://www.maximoaccess.com/t50-filtragem-em-cascata
https://www.maximoaccess.com/t12966-combos-em-cascata-num-formulario-continuo
https://www.maximoaccess.com/t31093-resolvidofiltro-usando-caixa-de-texto?highlight=cascata#215144
https://www.maximoaccess.com/t29587-resolvidofiltro-em-cascata-entre-caixas-de-listagem-e-combinacao-atraves-da-lista-de-campos?highlight=cascata#205840
https://www.maximoaccess.com/t7551-6-caixas-de-combinacao-em-cascata
https://www.maximoaccess.com/t28166-filtro-com-caixa-de-combinacao-em-cascata?highlight=cascata#197121
...

Por isso sempre que solicitar auxilio, disponibilize um exemplo (tabelas, consultas, formularios, relatorios, macros, modulos) envolvidos na questao.

Boa tarde Senhores

Seguindo o conselho do Professor Tauron consegui criar um BD para analise.

Vejam eu criei um formulário aonde eu chamo o relatório com os campos:
Data Inicial
Data Final
Centro de Custo
Obs: Tem uma caixa de combinação para impressão de Sintético ou Analítico, por gentileza cliquem no Analítico pois o sintético é o mesmo relatório de forma resumida.
Coloquei uma caixa de listagem com os campos dos centro de custos utilizados, pois tudo que quero é selecionar esses centro de custos seja através de uma caixa de listagem ou várias caixas de seleção, aonde coloco um código para imprimir múltiplos centro de custos.
Se alguém puder me ajudar com esses códigos lhe agradeço, pois somente encontrei combos cascatas em formulários, eu preciso disso impresso.

Obrigado.

Boa noite,
Altere a caixa de listagem para Selecções Múltiplas: Simples

Código:

Private Sub btn_imprimir_Click()
    Dim bolListar As Boolean, strFiltro As String, item
    If Me.Txt_tipo.Value = "Analítico" Then
        For Each item In clt_Centro.ItemsSelected
                strFiltro = strFiltro & ",'" & clt_Centro.Column(0, item) & "'"
                bolListar = True
        Next
        If strFiltro <> "" Then strFiltro = "Centro_custo IN (" & Mid(strFiltro, 2) & ")"
       
        Me.Visible = False
        If bolListar Then DoCmd.OpenReport "Rel_Operacional_1", acViewPreview, , strFiltro
        DoCmd.Close acForm, "frmazul"
    Else
        DoCmd.Minimize
        DoCmd.OpenReport "Res_Operacional_sintetico", acViewPreview
        DoCmd.Close acForm, "frmazul"
    End If
End

Obrigado