Insert and Delete blanks rows so that there are 2 blanks rows between text rows

Excel 2010: Need a Macro. I am not a coder and need desperate help. I have a several workbooks with thousands of blank rows with text in between. Some of the blank rows maybe one line 2 or more. I would like it more consistent. I would like to have 2 blanks rows between any text rows in an entire Worksheet. Some of the rows may have 1, 2, 3, or 4 rows of text. I'd like to keep that data the way it is. So if three rows of data are together they stay together. Only affect the blank rows.

For example:

*Data Rows---*
*Blank Row*
*Data Rows---*
*Data Rows---*
*Blank Row*
*Blank Row*
*Blank Row*
*Blank Row*
*Blank Row*
*Data Rows---*
*Data Rows---*
*Data Rows---*
*Data Rows---*
*Blank Row*
*Blank Row*
*Blank Row*
*Data Rows---*
*Data Rows---*


into this:

*Data Rows---*
*Blank Row*
*Blank Row*
*Data Rows---*
*Data Rows---*
*Blank Row*
*Blank Row*
*Data Rows---*
*Data Rows---*
*Data Rows---*
*Data Rows---*
*Blank Row*
*Blank Row*
*Data Rows---*
*Data Rows---*

Can someone please help???

Thanks.
-Ernie