I'm not much of an expert in VBA and I'm totally new to Selenium for VBA. I am trying to access this site
You may need some form of wait for filtering to be applied. This could be achieved by using a timed loop (to avoid infinite looping) with one exit condition being a max time to loop being exceeded and the other being:
bot.findElementsByCss("#demo tbody > tr[style]").count > 0
Exit for whichever comes first.
Or use a timeout:
Dim hiddenRow As WebElement
Set hiddenRow = bot.FindElementByCss("#demo tbody > tr[style]", timeout:=<enter timeout>, Raise:=False)
If hiddenRow Is Nothing Then Exit Sub