MaximoAccess

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

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Apply Filter não reconhece parâmetro

    Compartilhe

    Aldovsk
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 26/06/2017

    [Resolvido]Apply Filter não reconhece parâmetro

    Mensagem  Aldovsk em Seg 26 Jun 2017, 15:13

    Bom dia!
    Declarei uma variável Global chamada vAnoGeral que recebe o ano a ser usado nos formulários do Sistema. Quando abro um determinado formulário, uso uma outra variável privada que igualo a esse valor da Global. Tudo funciona normal inclusive exibo os valores com o MsgBox de cada uma delas. O problema é quando vou usar o Apply Filter para filtrar somente os registros daquele ano. Quando faço a comparação do campo do formulário chamado ano_dados com um valor fixo, por exemmplo "2017", funciona normal como a seguir:

    DoCmd.ApplyFilter , "ano_dados = '2017'"

    Mas quando tento colocar o valor da variável privada vanoatual que criei ou da Global vAnoGeral, não funciona:

    Private Sub Form_Load()
    Dim vanoatual As String
       vanoatual = vAnoGeral
       DoCmd.ApplyFilter , "ano_dados = vanoatual"
    End Sub

    Aparece uma caixa de mensagem no formulário pedindo pra eu digitar o valor do parâmetro. Ao digitar esse valor que seria o ano, funciona o filtro normalmente.
    Agradeço pela atenção de todos.
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9703
    Registrado : 04/11/2009

    Re: [Resolvido]Apply Filter não reconhece parâmetro

    Mensagem  JPaulo em Seg 26 Jun 2017, 15:28

    Ola seja bem vindo ao forum;

    Se é uma variavel de texto, tem de a colocar entre aspas simples;

    Código:
    DoCmd.ApplyFilter , "ano_dados ='" & vanoatual & "'"


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    avatar
    daniloreiis
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 329
    Registrado : 14/02/2011

    Apply Filter não reconhece parâmetro

    Mensagem  daniloreiis em Seg 26 Jun 2017, 15:28

    Bom dia meu amigo, poderia postar o projeto para melhor ajuda-lo ?

    Att


    .................................................................................
    Att, Danilo Reis
    -------------------------------------------------------------------------------------------------------------------------------------------------

    Se alguém não quiser trabalhar, não coma também.
    2 Tessalonicenses 3:10

    Aldovsk
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 26/06/2017

    Funcionou corretamente!

    Mensagem  Aldovsk em Seg 26 Jun 2017, 16:00

    Obrigado JPaulo. Tinha passado uma tarde toda sem conseguir resolver esse problema. Muito Obrigado!
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9703
    Registrado : 04/11/2009

    Re: [Resolvido]Apply Filter não reconhece parâmetro

    Mensagem  JPaulo em Seg 26 Jun 2017, 16:13

    Obrigado pelo retorno o forum agradece.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

      Data/hora atual: Qua 22 Nov 2017, 19:56