Notifications
Clear all

OCULTAR LINHAS PELO CheckBox

6 Posts
4 Usuários
0 Reactions
1,660 Visualizações
(@nando)
Posts: 53
Trusted Member
Topic starter
 

Boa noite,

Postei um tópico anterior o gtsalikis me ajudou muito..mais uma vez conto com ajuda.

Conforme o modelo: OCULTO a LINHA conforme o VALOR do VBA=2 SE CheckBox =Verdadeira , Quando CheckBox for FALSO quero exibir as linhas com VBA=2.

 
Postado : 06/05/2014 10:12 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Tente assim.

Private Sub CheckBox1_Click()
Dim i As Integer
For i = 1 To 20
If Range("C" & i).Value = 3 Then
Rows(i & ":" & i).Select
Selection.EntireRow.Hidden = True
ElseIf CheckBox1.Value = False Then
Selection.EntireRow.Hidden = False
Else
End If
Next i

End Sub
Private Sub CheckBox2_Click()
Dim i As Integer
For i = 1 To 20
If Range("C" & i).Value = 2 Then
Rows(i & ":" & i).Select
Selection.EntireRow.Hidden = True
ElseIf CheckBox2.Value = False Then
Selection.EntireRow.Hidden = False
Else
End If
Next i

End Sub

Att

 
Postado : 07/05/2014 5:22 am
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

nando,

Bom Dia!

Veja se é assim.

 
Postado : 07/05/2014 5:42 am
(@gtsalikis)
Posts: 2373
Noble Member
 

Não entendi, pq vc criou outro tópico?

A resposta que passei no outro não resolveu?
viewtopic.php?f=10&t=11544

 
Postado : 07/05/2014 6:09 am
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

nando,

Aproveitando o ensejo, peço que das próximas postagens de arquivos aqui no fórum, que você faça antes a compactação do mesmo com ZIP, por menor que seja o arquivo. São as regras do fórum.

 
Postado : 07/05/2014 6:28 am
(@nando)
Posts: 53
Trusted Member
Topic starter
 

Boa tarde ...

Meus colegas Wagner Morel e gtsalikis!
Obrigado por compartilhar o conhecimento....foi de grande importância a colaboração de todos!!!
Atenciosamente,
Nando

 
Postado : 07/05/2014 1:09 pm