Vídeo recomendado
https://youtu.be/diWPPPhW-9E

AUTOFILTRO COM CRITÉRIO DO CHECKBOX TRUE

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
fabricio.araujop
Acabou de chegar
Acabou de chegar
Mensagens: 2
Registrado em: Dom Ago 12, 2018 12:39 pm

AUTOFILTRO COM CRITÉRIO DO CHECKBOX TRUE

Mensagem por fabricio.araujop »

Pessoal, boa tarde!

Preciso fazer um autofiltro em vba que utilize apenas as checkbox que foram marcadas (resultado True).

No exemplo abaixo, se aplico somente para ela dá certo, mas se começo colocar outras opções, pois são 8 regionais como esta, só seleciona a última.

Basicamente o que preciso fazer é usar o critério apenas se o checkbox (aqui denominado RSSAO, tenho outras como RSSPI, RSGSP) for True, se False desconsidera.

Poderiam me ajudar?

Private Sub RSSAO_Click()
If RSSAO = True Then
Selection.AutoFilter Field:=1, Criteria1:="RSSAO"
ElseIf RSSAO = False Then
Selection.AutoFilter Field:=1
End If
End Sub


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1537
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: AUTOFILTRO COM CRITÉRIO DO CHECKBOX TRUE

Mensagem por Reinaldo »

Autofiltro os critérios são bem restritos, creio eu que no maximo 2 criterios.
algo como>
Selection.AutoFilter Field:=1, Criteria1:="RSSAO", Operator:=Or, Criteria2:="RSSPI"


fabricio.araujop
Acabou de chegar
Acabou de chegar
Mensagens: 2
Registrado em: Dom Ago 12, 2018 12:39 pm

Re: AUTOFILTRO COM CRITÉRIO DO CHECKBOX TRUE

Mensagem por fabricio.araujop »

Há como fazer mais filtros, oque não estou sabendo é como concatenar o uso do checkbox para que leia somente os que são True, na hora de filtrar.


Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1537
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: AUTOFILTRO COM CRITÉRIO DO CHECKBOX TRUE

Mensagem por Reinaldo »



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder