P:L:E:A:S:E !!! Help! Cannot remove blank cells

Hi everybody,
I'm new here.
I need the formula that can randomly pick up a word from the specific list and put it in a cell. I have some issues with excel formula that I have: =INDEX(List!A2:A7,ROUND(RAND()*COUNTA(List!A2:A7),0))
It does random, but it doesn't ignore blank cells. (it shows me: #Value! -when it hit a blank cell)
Example what I need:
A1: Food:
A2: Hamburger
A3: Pizza
A4: Ice-cream
A5: (it could be a blank cell)
A6: (it could be a blank cell)
A7: (it could be a blank cell)

This list will be changing a lot.


P.S. I've attached a file. If you need to see this problem.


Please I really need your help.
Thank in advanced.

Thank you very very much! It's really works!!! And thank you for the quick response!