Filteren via rij ipv via kolom

[ddr23]

In een tabel kan ik filteren via kolomfilter.
Hierdoor worden de rijen met niet geselecteerde items verborgen.

Maar is dit ook mogelijk in de andere richting?
Dus items selecteren op rij niveua, waardoor de kolomen verborgen worden die niet voldoen aan de geselecteerde items.

Zie bijgevoegd bestand.

vb. Als ik rij met getal 5 (rij8) wil filteren op enkel 'JA' , dan zouden alle kolommen verborgen moeten worden behalve kolom met waarde C in. (kolom E)

Dus zelfde principe als in de kolom ,maar dan op een rij.

Hopelijk een beetje duidelijk.

 

[peter59]

Hallo,

Misschien zoiets?
Gedaan met power query.

 

[JEC.]

Optie met VBA

Sub jec()
 Dim it, a As Long
 a = Application.InputBox("Kies tabelrij", , , , , , , 1)
 With ActiveSheet.ListObjects(1)
    If a = False Or a > .ListRows.Count Then Exit Sub
    For Each it In .ListRows(a).Range
      it.Columns.Hidden = it = "NEEN" Or it = ""
    Next
 End With
End Sub