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

2 participantes

    [Resolvido]Filtrar dados do formulário atrvés de caixa de texto não acoplado - usando VBA

    avatar
    AlbertoG
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 18/01/2015

    [Resolvido]Filtrar dados do formulário atrvés de caixa de texto não acoplado - usando VBA Empty [Resolvido]Filtrar dados do formulário atrvés de caixa de texto não acoplado - usando VBA

    Mensagem  AlbertoG 9/8/2015, 03:01

    Olá! Estou criando um banco de dados para cadastro de alunos e controle de frequência. Haverá turmas de A à Z, serão 10 alunos por turma. Quando eu colocar na caixa de texto a letra "A", deverá aparecer no formulário apenas os estudantes matriculados na turma A. Como programar isso via VBA? Obrigado!
    LiveBrain
    LiveBrain
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 182
    Registrado : 15/05/2011

    [Resolvido]Filtrar dados do formulário atrvés de caixa de texto não acoplado - usando VBA Empty Re: [Resolvido]Filtrar dados do formulário atrvés de caixa de texto não acoplado - usando VBA

    Mensagem  LiveBrain 9/8/2015, 14:06

    Opa Amigo,

    Coloque o código na propriedade Após Atualizar da sua caixa de Texto

    Código:
    If SuaCaixaDeTexto= "" Or IsNull(SuaCaixaDeTexto) Then
        DoCmd.ShowAllRecords
    Else
        DoCmd.ApplyFilter , "CampoTurma='" & SuaCaixaDeTexto& "'"
    End If

    Faça as adaptações pro seu projeto




    .................................................................................
    Abraços

    Live Brain Tutoriais

    "Fraca é a pessoa que não conhece a força que possui nos amigos"
    avatar
    AlbertoG
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 39
    Registrado : 18/01/2015

    [Resolvido]Filtrar dados do formulário atrvés de caixa de texto não acoplado - usando VBA Empty Re: [Resolvido]Filtrar dados do formulário atrvés de caixa de texto não acoplado - usando VBA

    Mensagem  AlbertoG 12/8/2015, 02:39

    Simplesmente perfeito! Muito grato pela partilha de conhecimento. Fique com Deus!

      Data/hora atual: 28/11/2022, 02:11