[Resolvido]Filtragem tipo relat. cx. listagem

Olá. Antecipadamente agradeço pela ajuda:

Elaborei um formulário para filtrar 4 tipos de relatórios direferentes clicando um botão visualizar

As filtragens serão feitas pelo:
Nome do paciente: (selecionado a partir de uma caixa de listagem) - Já feito
Período: Inical e final (Campo data abreviada) - já feito e

Tipo de relatório (selecionado a partir de uma caixa de listagem - Ver imagem) - NÃO FEITO
O que preciso é que após selecionar o Nome do paciente, o período e
Selecionar o tipo de relatório da caixa de listagem, após clicar o botão Visualizar/Imprimir
Aparece somente o Relatório selecionado pela filtragem.

Bom se tiver tempo para conversar vou ficar disponível kkkkk

Vamos fazer igual a nosso amigo Jack estripador.... vamos dividir o problema em partes....
Já fez o comando para para abrir o relatório de acordo com o item que você selecionou?

Bom dia. A parte para filtrar por nom e data eu já fiz. Estou com dificuldades para montar a rotina para filtrar o tipo de relatório pela caixa de listagem.

Vou considerar que seus campos são texto então fica o seguinte:

Código:


Private Sub Comando4_Click()
If ListaReport.Value = "Relatório 01" Then
    DoCmd.OpenReport "Relatório1", acViewPreview
ElseIf ListaReport.Value = "Relatório 02" Then
    DoCmd.OpenReport "Relatório2", acViewPreview
End If
End Sub


Olha se entende.

Olá. Funcionou!
Seguindo suas instruções a montagem ficou assim:

Private Sub BtVisRlt_Click()

If CombFltTpRlt.Value = "Imprimir Clientes" Then
DoCmd.OpenReport "RltInfPessImp", acViewPreview

ElseIf CombFltTpRlt.Value = "Imprimir PA" Then
DoCmd.OpenReport "RltPresArtImp", acViewPreview

ElseIf CombFltTpRlt.Value = "Visualizar Clientes" Then
DoCmd.OpenReport "RltInfPessVis", acViewPreview

ElseIf CombFltTpRlt.Value = "Visualizar PA" Then
DoCmd.OpenReport "RltPresArtVis", acViewPreview
End If

End Sub

Muito obrigado!

Show.