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


3 participantes

    [Resolvido]Sintaxe de Filtragem

    avatar
    Larimer
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 10/08/2013

    [Resolvido]Sintaxe de Filtragem Empty [Resolvido]Sintaxe de Filtragem

    Mensagem  Larimer 14/6/2016, 21:52

    Meus amigos, boa noite.

    Será se alguém pode me ajudar com esse simples comando?
    Não há meio de retornar o formulário filtrado. Só volta em branco:

    Private Sub Filtro_Click()
    DoCmd.ApplyFilter , "Área = '& Me!ÁreaFt.Column(0)'"

    End Sub


    Já tentei tudo. Usei Like no lugar de = , tirei aspas e apóstrofes. Usei ponto no lugar de exclamação...

    Não há meio. Volta sempre como se não houvesse correspondência com a cx de listagem [ÁreaFt].
    A cx de listagem [ÁreaFt] é alimentada por um campo "Área" da mesma tabela em que se baseia o formulário.
    É um filtro absolutamente simples.
    Mas não retorna registros filtrados. Socorro!
    Obrigado!

    Lárimer
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Sintaxe de Filtragem Empty Re: [Resolvido]Sintaxe de Filtragem

    Mensagem  FabioPaes 14/6/2016, 22:00

    Vamos la... Tente assim:

    DoCmd.ApplyFilter , "[Área] = ' " & Me![ÁreaFt].Column(0)" ' "

    Principal problema seu é a nomenclatura amigo... Acentos...

    Outra coisa, é: Quando é Texto fica entre ' " & me.campo & " '.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    Larimer
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 10/08/2013

    [Resolvido]Sintaxe de Filtragem Empty Re: [Resolvido]Sintaxe de Filtragem

    Mensagem  Larimer 14/6/2016, 22:22

    Amigo Fabio, super obrigado.

    Seguindo sua sugestão, fiz assim:

    DoCmd.ApplyFilter , "[Área] = ' " & Me![ÁreaFt].Column(0) & " ' "

    Rodou, só que continua voltando em branco.

    Tentei com Like no lugar de = e deu na mesma...

    De qualquer forma agradeço demais!

    Lárimer
    avatar
    Larimer
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 10/08/2013

    [Resolvido]Sintaxe de Filtragem Empty Re: [Resolvido]Sintaxe de Filtragem

    Mensagem  Larimer 14/6/2016, 22:28

    Fabio,

    Também seguindo sua sugestão, tentei a mesma sintaxe para um campo chamado "Projeto", para evitar a questão do acento... mas tbém está voltando o formulário em branco.

    Thks!

    Lárimer
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]Sintaxe de Filtragem Empty Re: [Resolvido]Sintaxe de Filtragem

    Mensagem  Avelino Sampaio 14/6/2016, 22:29

    Olá!

    não dê espaços antes e após os apóstrofes.  A caixa de mensagem exibe o valor desejado ?

    msgbox Me![ÁreaFt].Column(0)
    DoCmd.ApplyFilter , "Área = '" & Me![ÁreaFt].Column(0) & "'"

    Aguardamos


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    Larimer
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 10/08/2013

    [Resolvido]Sintaxe de Filtragem Empty Re: [Resolvido]Sintaxe de Filtragem

    Mensagem  Larimer 14/6/2016, 22:44

    Amigos Avelino e Fabio, funcionou !

    De fato, era algum detalhe na sintaxe.

    Muito obrigado!

    Lárimer

    Conteúdo patrocinado


    [Resolvido]Sintaxe de Filtragem Empty Re: [Resolvido]Sintaxe de Filtragem

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 23:50