MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

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 para um campo do relatório

    avatar
    lulenunes
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 60
    Registrado : 05/06/2015

    [Resolvido]Filtro para um campo do relatório Empty [Resolvido]Filtro para um campo do relatório

    Mensagem  lulenunes 29/9/2016, 15:13

    Caros amigos, bom dia.

    mais uma vez recorro a sabedoria de vocês, estou com uma dúvida danada em algo até simples, porém, não estou conseguindo que dê certo.

    Possuo um relatório de funcionários que quero que saia somente os funcionários ativos, para isso possuo um campo chamado Situação.

    Para abrir o relatório criei um form com uma combox, com o qual aciono vários relatórios de funcionários. Para isso estou usando os seguintes códigos na combox:

    Private Sub CXComb_Class_AfterUpdate()
       If CXComb_Class = "Com Salário" Then
       DoCmd.OpenReport "RL_RelFunc", acViewPreview
       DoCmd.Maximize
       ElseIf CXComb_Class = "Sem Salário" Then
       DoCmd.OpenReport "RL_RelFuncSsal", acViewPreview
       DoCmd.Maximize
       ElseIf CXComb_Class = "Com Sal. Por Setor" Then
       DoCmd.OpenReport "RL_FuncSetor", acViewPreview
       DoCmd.Maximize
       ElseIf CXComb_Class = "NomeCargoSetorRG" Then
       DoCmd.OpenReport "RL_NomeCargoSetorRG", acViewPreview, ,"Situação="  (meu problema está exatamente aqui, como posso fazer com que ele filtre somente as situações que sejam diferentes de Desligado - em uma consulta sei que seria "<>Desligado" mas no VBA não sei como incorporar esta instrução)
       DoCmd.Maximize
       End If
       
    End Sub


    Grato a todos.
    rubenscouto
    rubenscouto
    Super Avançado
    Super Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 638
    Registrado : 02/10/2011

    [Resolvido]Filtro para um campo do relatório Empty Re: [Resolvido]Filtro para um campo do relatório

    Mensagem  rubenscouto 30/9/2016, 00:34

    tente assim:
    DoCmd.OpenReport "RL_NomeCargoSetorRG", acViewPreview, ,"Situação <> 'Desligado' "
    avatar
    lulenunes
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 60
    Registrado : 05/06/2015

    [Resolvido]Filtro para um campo do relatório Empty Re: [Resolvido]Filtro para um campo do relatório

    Mensagem  lulenunes 30/9/2016, 18:51

    Caro Rubens, boa tarde.

    Agradeço muito seu retorno, porém, infelizmente não funcionou.

    att.
    avatar
    lulenunes
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 60
    Registrado : 05/06/2015

    [Resolvido]Filtro para um campo do relatório Empty Re: [Resolvido]Filtro para um campo do relatório

    Mensagem  lulenunes 4/10/2016, 21:55

    Caro Rubens, boa tarde.

    Deu certo, o erro era meu, pois estava mantendo o sinal "=" após situação.

    Muito obrigado pela sua ajuda.

      Data/hora atual: 16/4/2021, 21:30