• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Rijen weergeven/verbergen met "vinkje"

Status
Niet open voor verdere reacties.

Bas web

Gebruiker
Lid geworden
5 mrt 2008
Berichten
86
Goedemorgen,

In een tabel wil ik mbv checkboxen verschillende rijen verbergen of weer laten geven.

Echter gaat het mis als ik 2 criteria tegelijk wil laten weergeven. De bijlage in het voorbeeld maakt het denk ik wel wat duidelijker.

Weet iemand hoe dit wel gerealiseerd kan worden?

Alvast bedankt voor jullie hulp!

Bekijk bijlage test.xlsm
 
Vervang je code eens door dit:

Code:
Private Sub nr1_Click()
If nr1.Value = True Then
    For RowCnt = 5 To 100
        If Cells(RowCnt, 1).Value = 1 Then
            Cells(RowCnt, 1).EntireRow.Hidden = True
        End If
    Next RowCnt
Else
        For RowCnt = 5 To 100
        If Cells(RowCnt, 1).Value = 1 Then
            Cells(RowCnt, 1).EntireRow.Hidden = False
        End If
    Next RowCnt
End If
End Sub

Private Sub nr2_Click()
If nr2.Value = True Then
    For RowCnt = 5 To 100
        If Cells(RowCnt, 1).Value = 2 Then
            Cells(RowCnt, 1).EntireRow.Hidden = True
        End If
    Next RowCnt
Else
        For RowCnt = 5 To 100
        If Cells(RowCnt, 1).Value = 2 Then
            Cells(RowCnt, 1).EntireRow.Hidden = False
        End If
    Next RowCnt
End If
End Sub

Private Sub nr3_Click()
If nr3.Value = True Then
    For RowCnt = 5 To 100
        If Cells(RowCnt, 1).Value = 3 Then
            Cells(RowCnt, 1).EntireRow.Hidden = True
        End If
    Next RowCnt
Else
        For RowCnt = 5 To 100
        If Cells(RowCnt, 1).Value = 3 Then
            Cells(RowCnt, 1).EntireRow.Hidden = False
        End If
    Next RowCnt
End If
End Sub
 
Thnx! Dat werkt perfect.

Alleen wordt hetgeen dat je selecteer "uitgeschakeld". Door True en False om te draaien kun je de rijen inschakelen door er een vinkje voor te zetten.

Thnx again!
 
Ik wilde deze uitbreiden met een 2de rij om een mogelijkheid te hebben om te kiezen, echter loop ik dan tegen het volgende probleem aan:
- ik heb een 3tal vinkjes voor kolom a en een 3-tal vinkjes voor kolom b. Echter als ik de vinkjes voor kolom b gebruik, wordt de eerste als het ware genegeerd.

Ik heb het bestand bijgevoegd, als je met de checkboxen "speelt" zie je dat het op een gegeven moment niet meer klopt. is dat ook aan te passen?
 

Bijlagen

Je hebt de draad op opgelost gezet. Dat bevordert natuurlijk niet dat helpers gaan kijken welke vervolgvraag je gesteld hebt.
 

Bijlagen

Oeps, had niet in de gaten dat ie op "opgelost" stond. Lekker slim van me :)

De filteroptie werkt inderdaad ook wel, echter zou ik het graag willen zien dmv checkboxen. Maar dat krijg ik vooralsnog niet voor elkaar.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan