selecting a range of cells starting with the ActiveCell

I am using "find" to locate the first empty cell in a column. From that "ActiveCell" I would like to clear the contents of the next 400 cells below it. I set up a for next loop but it is extremely sl...