[Resolvido]Filtro de Relatório baseado em Caixa de Combinação

Prezados (as), bom dia.

Estão tentando criar filtro de relatório baseado num Form contendo 4 caixas de combinação. Procurei no fórum e em outras páginas algo parecido mas ainda não achei nada que se assemelhe.

Modal
Dia
Mes
Ano

Quero fazer de uma forma onde o usuário possa escolher qualquer uma delas ou duas, ou três, ou as quatro e, clicando em emitir, o relatório seja exibido conforme a filtragem pré feita.

Para isso, inicialmente estou utilizando o seguinte código:

Private Sub Emitir_Click()
Dim A As String
Dim B As String
Dim C As String
Dim D As String
Dim Limpar As String

Limpar = ""

A = Me.Tipo_de_acesso_extenso_temp
B = Me.Dia_temp
C = Me.Mes_extenso_temp
D = Me.Ano_temp

If Not IsNull(Me.Tipo_de_acesso_extenso_temp) And Not IsNull(Me.Dia_temp) And Not IsNull(Me.Mes_extenso_temp) And Not IsNull(Me.Ano_temp) Then
DoCmd.OpenReport "Report Entrada", acViewReport, , "[Tipo_de_acesso_extenso]='" & A & "' And [Dia]='" & B & "' And [Mes_extenso]='" & C & "' And [Ano]='" & D & "'"
ElseIf IsNull(Me.Ano_temp) Then
If Not IsNull(Me.Tipo_de_acesso_extenso_temp) And IsNull(Me.Dia_temp) And IsNull(Me.Mes_extenso_temp) Then
DoCmd.OpenReport "Report Entrada1", acViewReport, , "[Tipo_de_acesso_extenso]='" & A & "' And [Dia]='" & B & "' And [Mes_extenso]='" & C & "'"
End If

End If


O primeiro teste (onde o usuário seleciona todos os campos) está OK. Contudo não estou conseguindo continuar isso. Testei criando um segundo relatório, mas não está dando certo. Segue o BD de exemplo.

Devo criar um relatório diferente para cada opção possível ou será que consigo filtrar sempre o mesmo relatório conforme as opções que o usuário inserir no form?


Já grato pela atenção de todos e espero ter me explicado bem!

Bom día Duarte!

Em anexo

Saludos

FranklinJSP Bom dia!

Entendi o que o amigo fez. Você colocou na fonte de registro do relatório os comandos de filtro usando SQL e IIF

Mas estou fazendo testes aqui e o relatório não está filtrando.

Por exemplo, se coloco Modal ESCOLAR, no Dia 17, no Mes MAIO, sem selecionar a Comb de Ano, o relatório aparece sem nenhuma informação.

Funciona!!!




Que versão de Access vc utiliza?

Saludos

Access 2007.

Pelos testes que fiz, ocorre o mesmo que acontece fazendo o código no VBA. Se eu deixar alguma Comb sem selecionar nada, ele exibe o relatório em branco.

Será que tem a ver com a fonte de registro das Combs?

veja este sem uso de vba usando o like no relatório
coloquei nome nas combos para melhor entendimento e programação.

scandinavo e FranklinJSP

Muito obrigado. Deu muito certo com a forma que o scandinavo fez.

Resolvido!

Valeu pelo retorno