[Resolvido]Utilizar Grupo de Opções como Filtro em Tabela

Olá,

Tenho um formulário que está lincado em uma tabela, nessa tabela tem um campo com apenas 2 informações, "Amarelo" ou "Verde", gostaria de utilizar um grupo de opções para filtrar uma dessas cores ou as duas cores ao mesmo tempo.

No mesmo formulário e na mesma tabela tenho outro campo, só que com 5 opções, "Brasil", "USA", "China", "Japão", "Alemanhã", gostaria de fazer a mesma coisa, filtrar um país de cada ou quantos eu selecionar no grupo de opções.

Lembrando que, ambos os campos "Países" ou "Cores" estarão em um mesmo formulário e poderão ser selecionados juntos, mas cada um estará em um grupo de opções diferentes, porém ao clicar nas seleções de cada grupo, o formulário irá aplicando os filtros.

Ps.: Eu procurei neste fórum e na internet mas não achei algo com as propriedades que procuro, se alguém puder me ajudar , desde já agradeço imensamente!


Att,
Cy Rangel.

Caro Amigo,

Se entendi direito, não seria criar Combobox nestes campos com as opções possíveis?

Espero ter ajudado.

Olá,

Sim, seria como se fosse uma combobox, mas prefiriria usar um grupo de opções, pois visualmente fará mais sentido no meu Form. Uma combobox os campos ficarão escondidos e só aparecerão se eu clicar na seta ou ainda com a listbox ficarão gigantes no formulário.




Att
Cy Rangel.

Outra opção é Grupo de Opções. Fica tudo explícito.

Abraços

Exato, é o que eu preciso, que fique tudo explicito, por isso pensei em usar o Grupo de opções.


Att,
Cy Rangel

Caro amigo,

Se esta satisfeito marque como resolvido.

Abraços

Desculpe, mas talvez não tenha me expressado direito. Eu gostaria da ajuda de como construir o código no vba para filtrar os dois campos que mencionei no início do post mas através de um grupo de opções. Não sei como fazer isso!


Desde já agradeço
Att
Cy Rangel.

Grande Cy Rangel,

Siga esse roteiro para criar o Grupo de Opções:
Abra seu formulário no modo Design;
Na barra de opções (menu superior) escolha Design;
Vá para Controles;
Escolha Grupo de Opções;
Siga o Assistente e associe ao campo desejado com as opções de seu desejo;
Salve tudo.

Se preferir envie o BD para verificarmos.

Espero ter ajudado

Abraços

Agradeço muito a sua atenção mas essa parte eu sei fazer, mas as caixas ficam sem controle, não adianta clicar nos quadradinhos que eles não filtram nada. Preciso lincar na tabela. Sabe como faço isso?

Olá,

No próprio Assistente do Grupo de Opções você associa, por exemplo: 1.Brasil, 2.USA, 3.China, 4.Japão, 5.Alemanha. Olhe detalhadamente as opções do Assistente, tem muitas opções para escolher.

Seria isso?

Abraços

Rs, acho que não.
Olha só, eu tenho uma tabela já com todos os dados preenchidos e então eu criei esse grupo de opções mas ele não está associado a nada, se eu clicar em qquer caixinha, ele não faz nada. Eu queria usá-lo para quando eu clicasse, por exemplo na cor "amarelo" e no país Brasil, ele pegasse essa minha tabela já com todos os registros preenchidos e filtrasse pra mim todos os registros apenas do que eu selecionei. Se eu tiver 5 registros com Brasil e 2 na cor amarelo, ele aparecerá na minha tabela abaixo 7 registros. Eu estou usando o formulário dividido. Em cima eu tenho os controles e em baixo aparece a minha tabela

Obrigada.

Poste o BD com formulário e as tabelas associadas para entender melhor.

Abraços

Olá,

Ainda hoje mais tarde enviarei um modelo do que eu gostaria.


Muito obrigada pela atenção.


Att
Cy Rangel

Olá,

Segue anexo um modelo do que eu gostaria.


Ao clicar em qualquer País (seja em conjunto com outro, ou individualmente) juntamente com a Cor, gostaria que a tabela abaixo fosse filtrada conforme as seleções que eu fizer.


Desde já agradeço.

Cy Rangel.

Bom dia Cy Rangel

Adicionei duas tabelas - Paises e Cores

para o caso de quereres outros países ou cores

Abraço

Olá Bacano, tudo bem?

Obrigada pela ajuda. Dessa forma ficou muito legal, mas eu não consigo selecionar mais de uma opção em cada caixa.

Pode ser que eu precise selecionar por exemplo, "Brasil" e "Alemanhã', juntamente com a cor "Verde". Pode ser que eu precise ver tudo ao mesmo tempo, sem nenhum filtro (todos os países e todas as cores).

O que eu criei e postei é apenas um modelo do meu banco de dados verdadeiro, e haverá realmente apenas uma única coluna (campo) para cada informação, uma para Países e outra para Cores (como eu havia postado )

Será que você consegue me ajudar e adaptar o meu banco para a "Caixa de Opções"?



Desde já agradeço muito.

Att
Cy Rangel

Boa tarde Cy Rangel

Pode ser que eu precise ver tudo ao mesmo tempo, sem nenhum filtro (todos os países e todas as cores).

  - Quando abre o formulário, ele mostra tudo, e se os campos estiverem em branco também

  - agora 2 ou mais ao mesmo tempo nao consigo

Abraço

Ok, compreendo.

Mas é que realmente preciso filtrar mais de uma opção em ambos os campos.

De qualquer forma, muito obrigada pela sua disponibilidade!


Irei aguardar para ver se mais alguém consegue me ajudar.


Att,
Cy Rangel

Pessoal, cheguei muito perto!

Achei um vídeo na internet que explica como criar o filtro utilizando a caixa de opções, o único detalhe é que elas não respondem juntas. Ou filtram as seleções do campo "País" ou as seleções do campo "Cor".

Será que agora estaria mais fácil para alguém me auxiliar de modo que ambas as caixas trabalhem unidas?
Por exemplo, "Brasil + Amarelo", se for "Brasil + Verde', trazer uma mensagem "Não existe".


Segue o link do vídeo e abaixo o código + Access alterado.

https://www.youtube.com/watch?v=sW5OPigrSvA

Código:

Private Sub OpcoesCores_AfterUpdate()

If OpcoesCores = 1 Then
    Me.FilterOn = False
    
Else
    If OpcoesCores = 2 Then
    Me.Filter = "Cor = 'Amarelo'"
    Me.FilterOn = True
    End If

If OpcoesCores = 3 Then
    Me.Filter = "Cor = 'Verde'"
    Me.FilterOn = True
    End If

End If
End Sub

Private Sub OpcoesPaises_AfterUpdate()

If OpcoesPaises = 1 Then
    Me.FilterOn = False
    
Else
    If OpcoesPaises = 2 Then
    Me.Filter = "País = 'Brasil'"
    Me.FilterOn = True
    End If

If OpcoesPaises = 3 Then
    Me.Filter = "País = 'USA'"
    Me.FilterOn = True
    End If

If OpcoesPaises = 4 Then
    Me.Filter = "País = 'Japão'"
    Me.FilterOn = True
    End If

If OpcoesPaises = 5 Then
    Me.Filter = "País = 'Alemanhã'"
    Me.FilterOn = True
    End If

If OpcoesPaises = 6 Then
    Me.Filter = "País = 'China'"
    Me.FilterOn = True
    End If
    
End If
End Sub


Desde já agradeço.

Att,
Cy Rangel.

Bom dia
Veja e tenha atenção ao preenchimento de dados nas tabelas para testes
Deu muito trabalho mas também porque na tabela tinha Alemanhã em vez de Alemanha

bom dia Cinthia

Esta cheia de sorte , também acabei agora de concluir o meu    

Att,

Ventura

@Alexandre, realmente imagino que deve ter dado muito trabalho, MAS FICOU INCRÍVEL , era exatamente o que eu precisava. Eu havia procurado algo semelhante mas não tinha encontrado nada na internet, o mais próximo, foi o caso do link que eu postei. E me desculpe, fiz uma base de modelo rapidamente e não me atentei que havia escrito errado.

@Bacano, obrigada pela sua atenção, disponibilidade e também por retornar anteriormente dizendo que não tinha conhecimento até aquele momento para me ajudar, isso foi muito legal porquê não gerou expectativa e eu fui atrás de mais insumos para que pudessem me auxiliar.


Assim como eu, percebo que vocês são insistentes, o que me fez ter "sorte", rs...


Agradeço imensamente ao trabalho de vocês, é muito legal ter pessoas que se disponibilizam a ajudar por gostarem do que fazem!


PARABÉNS