Nul verbergen als een cel niet is ingevuld.

[Cobbe]

Wat denk je dan hiervan?

 

[piekewieke]

Dit is zo als ik het bedoel.

Mijn dank is groot.

 

[Cobbe]

Graag gedaan!!

 

[JanBG]

Als je dat met voorwaardelijke opmaak doet in plaats van cel eigenschappen, gaat het wel goed:



Al opgelost zie ik

 

[VenA]

Alle code die je erin hebt staan kan wel wat eenvoudiger. Waarom er 7 lege modules in staan zal wel een reden hebben. Gebruik 1 rij voor de kolomkoppen.
Met 1 basis procedure kan je het geheel sorteren in het blad 'OVERZICHT'

Sub VenA(r As Range)
  Cells(4, 1).CurrentRegion.Sort r, , , , , , , xlYes
End Sub

Voor de verschillende knopen maak je dan een aanroep aan bv

Sub srt_Teamnr()
  VenA [C4]
End Sub