Loop through groups of rows separated by empty cells

Greetings,

I'm looking for a macro that can loop through a column with rows separated by empty cells and copy the group of rows to its own sheet. After running the macro file will have several thousand sheets each with a set of 2-5 rows corresponding to a matching set of keywords.

Please see attached. The macro should loop through Col A, and every time a blank is encountered it will copy the set of rows to a new sheet. At least I think that's the approach that should be taken...

I hope this made sense..

Any help would be greatly appreciated! I'm a newbie and not sure even where to start.