MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

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

    mduarteteixeira
    mduarteteixeira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 99
    Registrado : 15/07/2014

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

    Mensagem  mduarteteixeira em 20/5/2019, 11:40

    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!
    Anexos
    [Resolvido]Filtro de Relatório baseado em Caixa de Combinação AttachmentTesteFiltroRelatório.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (71 Kb) Baixado 9 vez(es)
    FranklinJSP
    FranklinJSP
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 366
    Registrado : 25/02/2016

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

    Mensagem  FranklinJSP em 20/5/2019, 14:37

    Bom día Duarte!

    Em anexo

    Saludos


    .................................................................................
    Meu Português não é muito bom,
    mas eu gosto de colaborar... em qualquer idioma
    Smile "Access... minha paixão"
    mduarteteixeira
    mduarteteixeira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 99
    Registrado : 15/07/2014

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

    Mensagem  mduarteteixeira em 20/5/2019, 15:30

    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.
    FranklinJSP
    FranklinJSP
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 366
    Registrado : 25/02/2016

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

    Mensagem  FranklinJSP em 20/5/2019, 16:38

    Funciona!!!

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

    Que versão de Access vc utiliza?

    Saludos


    Última edição por FranklinJSP em 20/5/2019, 16:40, editado 1 vez(es) (Razão : .)


    .................................................................................
    Meu Português não é muito bom,
    mas eu gosto de colaborar... em qualquer idioma
    Smile "Access... minha paixão"
    mduarteteixeira
    mduarteteixeira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 99
    Registrado : 15/07/2014

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

    Mensagem  mduarteteixeira em 20/5/2019, 16:51

    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?

    scandinavo
    scandinavo
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 774
    Registrado : 11/11/2009

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

    Mensagem  scandinavo em 20/5/2019, 18:50

    veja este sem uso de vba usando o like no relatório
    coloquei nome nas combos para melhor entendimento e programação.
    Anexos
    [Resolvido]Filtro de Relatório baseado em Caixa de Combinação AttachmentTesteFiltroRelatorio2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (69 Kb) Baixado 26 vez(es)
    mduarteteixeira
    mduarteteixeira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 99
    Registrado : 15/07/2014

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

    Mensagem  mduarteteixeira em 20/5/2019, 19:18

    scandinavo e FranklinJSP

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

    Resolvido!
    scandinavo
    scandinavo
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 774
    Registrado : 11/11/2009

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

    Mensagem  scandinavo em 21/5/2019, 13:48

    What a Face Valeu pelo retorno What a Face

      Data/hora atual: 8/8/2020, 01:02