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]Filtro usando Caixa de Texto.

    Compartilhe

    aNachtergaele
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/08/2017

    [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  aNachtergaele em 23/8/2017, 02:21

    Senhores,
    Boa noite!

    Estou com dificuldade em acertar um filtro em um Sub Formulário.
    Copiei aqui um método de preenchimento da Caixa de texto usando o código abaixo.

    Private Sub btAdd_Click()
    Call BoundData
    Me.Recalc
    End Sub

    Sub BoundData()

       Dim frm As Form, ctl As Control
       Dim varItm As Variant

       Set frm = Forms!frmListBox2
       Set ctl = frm!CaixaDeListagem
       
    Me.CaixaDeTexto = Null

       For Each varItm In ctl.ItemsSelected 'eis o salvador da Pátria. Mais informações coloque o cursor no meio da palavra ItemsSelected e aperte F1.
       
       If IsNull(Me.CaixaDeTexto) Or Me.CaixaDeTexto.Value = "" Then
            Me.CaixaDeTexto = ctl.ItemData(varItm)
           
          Else
         
            Me.CaixaDeTexto = Me.CaixaDeTexto & "; " & ctl.ItemData(varItm)
          End If
                   
       Next varItm
       
    End Sub

    O filtro funciona se faço apenas uma seleção.
    Se faço a seleção de mais de uma linha na caixa de listagem não retorna nada.
    Não consigo achar uma solução... preciso da ajuda dos especialistas.


    Grato
    Anexos
    frmListBox2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (38 Kb) Baixado 18 vez(es)

    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 691
    Registrado : 29/08/2012

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  Clebergyn em 24/8/2017, 00:16

    Olá aNachtergaele

    Esse banco de dados seu em anexo está meio bixado, fiz outro, baixe ai no link
    e veja se era isso mesmo que queria

    Baixe aqui

    aNachtergaele
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/08/2017

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  aNachtergaele em 24/8/2017, 19:07

    CleberGyn,
    PERFEITO!!!
    Você é o cara!

    Pergunta: o que há de "bixado" no bd que te mandei? Gostaria de não errar novamente!
    Muito obrigado novamente!

    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 691
    Registrado : 29/08/2012

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  Clebergyn em 24/8/2017, 20:56

    é que aqui não abriu o form e deu uma msg de erro

    talvez seja incompatibilidade de versoes, uso a v. 2013 do Access

    se ai não deu problema deixa assim

    aNachtergaele
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/08/2017

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  aNachtergaele em 24/8/2017, 21:26

    Cersar,
    Ficou ótimo o que você fez.

    Pra complicar um pouco...
    No caso do exemplo que te mandei, estou filtrando uma arvore mercadológica de produtos, onde temos uma hierarquia.
    Como ficaria se quiséssemos que haja a possibilidade de filtro em cascata e respeitando esta hierarquia, podendo começar pelo nível mais alto, ou mesmo, pelo mais baixo.

    Imagine que tenhamos:

    Departamento X;
            Categoria A;
                     Produto 1;
                     Produto 2;
            Categoria B;
                     Produto 3;
                     Produto 4;
    Departamento Y;
            Categoria C;
                     Produto 5;
                     Produto 6;
            Categoria D;
                     Produto 7;
                     Produto 8;

    Podendo filtrar direto pelo produto (opção 1), podendo filtrar pelo departamento e todos produtos de uma determinada categoria (opção 2)... e assim por diante.


    Como ficaria o código para esse caso???

    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 691
    Registrado : 29/08/2012

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  Clebergyn em 24/8/2017, 21:53

    então, não é Cesar é Cleber

    não entendi direito o que seria esse filtro em cascata

    seria se buscar por produto de aparecer a categoria e o departamento do produto isso?
    ou se buscar por departamento, de aparecer suas categorias com os produtos desse departamento isso?

    sem dados é dificil de imaginar o que quer, primeiro ajeite os dados nas tabelas, inserindo, produto, categoria, departamento
    e depois me envie

    aNachtergaele
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/08/2017

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  aNachtergaele em 24/8/2017, 22:33

    Cleber, me desculpe pela troca do nome. Estava conversando com um Cesar pouco antes.

    Coloquei no arquivo o formulário como entendi como coerente.

    A ideia é que ao filtrar um ou mais fabricantes, eu consiga filtrar e visualizar somente os departamentos, categorias, Linhas e Produtos destes Fabricantes.

    Ao filtrar um ou mais departamentos eu consiga visualizar e filtrar somente os fabricantes, Linhas, Categorias e Produtos deste(s) departamento(s).
    Neste mesmo exemplo acima, quando filtrar um ou mais departamentos, e filtrar um ou mais fabricantes, eu só consiga visualizar as Linhas, categorias e produtos que estão dentro deste Departamento e Fabricante. Assim por diante. Isso que quis dizer por cascata.

    Fiz algumas alterações nos nomes dos controles para personalizar.
    De CaixaDeTexto, para CaixaDeTextoCateg...

    Agradeço novamente por sua colaboração.

    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 691
    Registrado : 29/08/2012

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  Clebergyn em 25/8/2017, 00:59

    Veja ai no link se ajuda

    Baixe aqui

    aNachtergaele
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/08/2017

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  aNachtergaele em 25/8/2017, 01:33

    Os filtros, aparentemente não estão respeitando as hierarquias.
    Eu filtrei primeiro só a Linha "Similar", ele respeitou, somente vieram produtos da linha similar.
    Quando filtra Categoria "Liquidos", ele desrespeita o filtro anterior e somente filtra "Liquidis". E o mesmo acontece com o restante da hierarquia.

    Deveria respeitar os níveis...
    Quando filtra Linha "Similar", só trazer o que tem de Categorias dentro da Linha "Similar".
    O contrário também seria importante que funcionasse.... Quando filtro a Categoria "Liquidos" só trazer (ou habilitar) o que tem de Linhas dentro da Categoria "Líquidos".

    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 691
    Registrado : 29/08/2012

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  Clebergyn em 25/8/2017, 02:01

    é que voce usa termos que eu nao entendo, voce quer filtros de todas a listas ao mesmo tempo isso? ou seja
    que filtre os filtros que constam em uma lista e ao mesmo tempo que constam nas outras isso?

    aNachtergaele
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/08/2017

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  aNachtergaele em 25/8/2017, 02:28

    Vou tentar ser um pouco mais detalhado na minha explicação...
    Coloquei quatro tipos de Filtro no Formulário:
    1 - Fabricantes;
    2 - Linhas;
    3 - Categorias;
    e por fim 4 - Produtos.

    Este formulário servirá para selecionar produtos que deverão fazer parte de uma pesquisa, ou campanha qualquer.

    Quando seleciono um fabricante, Ache, por exemplo, tenho a opção de selecionar as Linhas de Genéricos, Controlados e Similares. Como a Ache não fabrica Perfumaria, esta opção deverá ser suprimida, ou não aparecer dentro das escolhas de Linhas.
    Se eu selecionar a Linha de Genéricos deverão aparecer as Categorias, por exemplo, Antigripal, Antiinflamatórios... Ou seja todas as categorias que estão dentro do Fabricante 'Ache', Linha 'Genéricos'.
    Ao selecionar a Categoria Antigripal deverão estar disponíveis os produtos que estão dentro do Fabricante Ache, Linha Genéricos, Categoria Antigripal.

    Seria interessante que fosse possível selecionar o Fabricante Ache, pular a Linha de Genéricos e ir direto para a Categoria Antigripal.
    Fazendo esta seleção teremos os produtos do Fabricante Ache, Categoria Antigripal e, por consequência, como não houve nenhuma seleção de alguma linha, as Linhas Genérico, Referencia, Similar e todas as linhas que respeitam a seleção que está feita (Ache; Antigripal).

    Imagine-se dentro de uma farmácia, ou dentro de um supermercado.
    No corredor (Linha) das bebidas eu posso ter a Categoria de refrigerantes, sucos, vinhos...
    Dentro da categoria Refrigerantes eu posso ter o fabricante Coca-Cola. E dentro deste fabricantes, respeitando as mesmas hierarquias anteriores, ter o produto Fanta Laranja.

    Neste meu universo, para efeito de explicação, a Coca-Cola fabrica pão de forma.
    Se eu selecionar o Fabricante Coca-Cola estarão disponíveis as Linhas Bebida e Paes.
    Posso então chegar na Fanta Laranja partindo do Fabricante Coca-Cola, ou filtrar a Bebida e o pão, no nível do produto.

    Espero ter sido mais específico...
    Obrigado novamente por sua paciência!!!!

    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 691
    Registrado : 29/08/2012

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  Clebergyn em 25/8/2017, 03:42

    Atualizei o link, baixe de novo e veja se é isso mesmo que precisa

    Baixe aqui

    aNachtergaele
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11
    Registrado : 21/08/2017

    Re: [Resolvido]Filtro usando Caixa de Texto.

    Mensagem  aNachtergaele em 25/8/2017, 03:53

    Cleber,
    Ficou excelente! Parabéns!
    Obrigado pela força e paciência comigo.

      Data/hora atual: 15/11/2018, 04:51