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


    Filtrar Grupo de Opções

    avatar
    m_sousa
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 159
    Registrado : 06/11/2020

    Filtrar Grupo de Opções Empty Filtrar Grupo de Opções

    Mensagem  m_sousa Sab 20 Fev 2021, 3:58 pm

    Olá

    Como posso num formque tem um subform continuo, pesquisar, deste tipo :

    Num grupo de opções
    1 Questionário Realizados
    2 Questionário Não Realizados

    Ao clicar numa das opções o subform é filtrado pelo campo Sim/Não que tem o nome Questionario.

    Código:
    Select Case Me!mdlOpcao
        Case 1
            strFiltro = "Questionario"
        Case Is = 2
            strFiltro = "Questionario "
        End Select
            Me.[frmsubAtividadesRealizadas].Form.RecordSource = "SELECT * FROM ConsTotalAtividades WHERE " & strFiltro

    Falta-me algo no código para chegar ao pretendido.

    Obrigado

    Um bem hajam... Saúde para todos.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2773
    Registrado : 21/11/2016

    Filtrar Grupo de Opções Empty Re: Filtrar Grupo de Opções

    Mensagem  DamascenoJr. Sab 20 Fev 2021, 4:35 pm

    Você botou

    strFiltro = "Questionario"

    Mas somente "Questionário" não é filtro. Tem que ser "Questionário = Alguma coisa", não concorda?


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    m_sousa
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 159
    Registrado : 06/11/2020

    Filtrar Grupo de Opções Empty Re: Filtrar Grupo de Opções

    Mensagem  m_sousa Sab 20 Fev 2021, 5:08 pm

    Olá

    Sr. Damasceno, tem toda a razão e o meu problema é esse mesmo Crying or Very sad

    Código:
    Select Case Me!mdlOpcao
        Case 1
          strFiltro = "Questionario LIKE '*" & 1 & "*' "
        Case Is = 2
          strFiltro = "Questionario LIKE '*" & 2 & "*' "
        End Select
            Me.[frmsubAtividadesRealizadas].Form.RecordSource = "SELECT * FROM ConsTotalAtividades WHERE " & strFiltro

    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2773
    Registrado : 21/11/2016

    Filtrar Grupo de Opções Empty Re: Filtrar Grupo de Opções

    Mensagem  DamascenoJr. Sab 20 Fev 2021, 5:22 pm

    Resolveu? O que aconteceu após a alteração? Detalhes são importantes para evitarmos adivinhações.

    Após a alteração também fez a atualização do controle?
    O código de atualização é esse
    Código:
    Me.[frmsubAtividadesRealizadas].Requery


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    m_sousa
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 159
    Registrado : 06/11/2020

    Filtrar Grupo de Opções Empty Re: Filtrar Grupo de Opções

    Mensagem  m_sousa Dom 21 Fev 2021, 2:19 pm

    Não Sr. Damasceno, não resolvi . . .
    O código não funciona !!!

    Conteúdo patrocinado

    Filtrar Grupo de Opções Empty Re: Filtrar Grupo de Opções

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Sab 15 Maio 2021, 7:54 am