Activate the worksheet where you want to insert blank rows.
Press Alt-F11 to open the Visual Basic Editor.
Click Insert > Module. In the module which appears, paste the code from post #2.
Click File > Close and return to Microsoft Excel.
Press Alt-F8 to open the Macro dialog.
Select macro "foo" then click Run.
Done.
Bookmarks