[Resolvido]Problemas com relatório

Senhores do conselho. Boa tarde
Mais uma vez venho recorrer à habitual ajuda dos senhores.

O que preciso creio, é simples

Tenho um BD de despesas domesticas
Nele tenho um formulário com um sub-formulário onde lanço as despesas
Pois bem, criei uma consulta baseada nesse formulário e dela criei um relatório.
O que pretendo é:

Nessa consulta tenho um campo que me informa o mês e ano do lançamento, onde tenho o critério para que se digite o mês desejado, até ai funcionando normal.
Acontece que tenho um outro campo com tipo de dados sim/não que me informa se a despesa já foi ou não paga.
Pergunto:
Como colocar um critério para que seja informado se quero o relatório das pagas, ou não pagas ou ainda o geral?

Outro ponto é:

Existe a possibilidade de ao informar, por exemplo que quero o relatório das pagas ele apareça com o nome "Relatório das despesas pagas referente ao mês de Fevereiro/2018", se escolher o relatório das não pagas o nome apareça "Relatório das despesas à pagar referente ao mês de Fevereiro/2018" e se escolher o total o nome apareça "Relatório geral das despesas referente ao mês de Fevereiro/2018", isso tudo sem ter que criar diversos relatórios?

Desde já agradeço a habitual ajuda

Talvez seja melhor criar um formulário com as opções de filtros para abrir o relatório.
O formulário teria um grupo de opções: pagas (1), não pagas (2) e geral (3), e caixas de combinação para mês e ano.

No critério do campo [Pago] na consulta do relatório:

Opção([Formulários]![NomeForm]![GrupoOp]=1;-1;[Formulários]![NomeForm]![GrupoOp]=2;0;[Formulários]![NomeForm]![GrupoOp];[Pago])

No evento "Ao abrir" do relatório:

Código:

If Forms!NomeForm!GrupoOp= 1 Then
    Me!Titulo.Caption = "Pagas"
ElseIf Forms!NomeForm!GrupoOp= 2 Then
    Me!Titulo.Caption = "Não pagas"
Else
    Me!Titulo.Caption = "Geral"
End If

onde "Titulo" é um rótulo no cabeçalho do relatório.

Claudio. Bom dia

Muito obrigado pela ajuda.
Dessa maneira ficou perfeito e atendeu perfeitamente minha necessidade.
Já estou colocando a sua sugestão em prática.

Grande abraço

Bom dia Carlão,

Estou percebendo agora que o critério na consulta estava incompleto:

Opção([Formulários]![NomeForm]![GrupoOp]=1;-1;[Formulários]![NomeForm]![GrupoOp]=2;0;[Formulários]![NomeForm]![GrupoOp]=3;[Pago])

E funcionava assim mesmo.
De qualquer maneira, a expressão acima parece o correto.

Abraço

Claudio.
Ok alteração processada.

Embora eu tenha dado como resolvido, estou tendo um erro no código ao abrir do relatório,
ele está informando não localizar o formulário.
Pergunto:
Tem como colocar, já que está funcionando perfeitamente, uma expressão no rótulo do relatório, informando que se o campo Pago do relatório estiver Sim ou seja 1 o rotulo deverá ser "despesas pagas", se estiver Não ou seja 2 o rótulo deverá ser "despesas a pagar" e se for as duas opções o rótulo ser "despesas geral".

Grato mais uma vez

Carlão, teria uma dificuldade quando a opção é "despesas geral".

Sugiro incluir no formulário um botão para abrir o relatório, garantindo que o formulário esteja aberto evitando o erro que você mencionou.

Ok Claudio

Vou testar e te informo

Claudio, testei aqui e ainda assim ele para na segunda linha do código, informando que não localiza o formulário1

Desculpe-me pelo trabalho que estou a te dar, mas sou iniciante nessa questão de módulo



Private Sub Report_Open(Cancel As Integer)
If Forms!formulario1!GrupoOp = 1 Then
Me!Rotulo37.Caption = "Pagas"
ElseIf Forms!formulario1!GrupoOp = 2 Then
Me!Rotulo37.Caption = "Não pagas"
Else
Me!Rotulo37.Caption = "Geral"
End If
End Sub


Grato

Verifique se o nome do formulário é exatamente formulario1 e se ele está aberto ao abrir o relatório.

Existe a possibilidade de ao informar, por exemplo que quero o relatório das pagas ele apareça com o nome "Relatório das despesas pagas referente ao mês de Fevereiro/2018", se escolher o relatório das não pagas o nome apareça "Relatório das despesas à pagar referente ao mês de Fevereiro/2018" e se escolher o total o nome apareça "Relatório geral das despesas referente ao mês de Fevereiro/2018", isso tudo sem ter que criar diversos relatórios?

Para ajudar com essa parte, seria mais fácil se você puder disponibilizar uma cópia do banco, mesmo sem dados.

Claudio.

Anexo, BD

Grato

Segue o BD com algumas alterações.

Claudio.

Muito obrigado pela força

Ficou perfeito

Agora entendi a aplicação do módulo

Valeu

Abraços