Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Sub verbergen()
Range("$A$1:$A$500").AutoFilter
ActiveSheet.Range("$A$1:$A$500").AutoFilter Field:=1, Criteria1:="<>"
i = Range("A501").End(xlUp).Offset(1).Row
Range("$A$1:$A$500").AutoFilter
Range("A" & i & ":A500").EntireRow.Hidden = True
End Sub
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.