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]Pesquisa por opção

    avatar
    m_sousa
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    [Resolvido]Pesquisa por opção Empty [Resolvido]Pesquisa por opção

    Mensagem  m_sousa em 28/11/2020, 21:56

    Olá

    Como posso fazer uma pesquisa ao escolher a opção e posteriormente escrever num campo txtpesquisa e este filtrar. Deixo parte da App.
    Anexos
    [Resolvido]Pesquisa por opção AttachmentPesquisa.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (30 Kb) Baixado 9 vez(es)
    avatar
    m_sousa
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    [Resolvido]Pesquisa por opção Empty Re: [Resolvido]Pesquisa por opção

    Mensagem  m_sousa em 29/11/2020, 12:48

    Na busca do sucesso . . .

    Coloquei no campo txtPesquisa o seguinte código, faltando apenas ao escolher o campo no subform que pretendo filtrar.

    Código:
    Private Sub txtPesquisa_AfterUpdate()
    Me.frmOcorrencias.Form.Filter = " Utentes like '*" & Me.txtPesquisa & "*' "
      Me.frmOcorrencias.Form.FilterOn = True
    End Sub
    avatar
    m_sousa
    Intermediário
    Intermediário

    Respeito às Regras 100%

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

    [Resolvido]Pesquisa por opção Empty Re: [Resolvido]Pesquisa por opção

    Mensagem  m_sousa em 29/11/2020, 13:11

    Resolvido !

      Data/hora atual: 18/1/2021, 20:16