One way you can do it w/o VBA - let's say your data is in B1:B100 and your
sheet has no data below row 100. Using a helper column (let's say column A)
enter

1
10
19

Then, select these three cells (A1:A3) and drag down to A100. Then in A101
enter 2 and in A102 enter

=IF(ISNUMBER(MATCH(A101+1, $A$1:$A$100,0)), A101+2, A101+1)

and copy down until you get a number that is one less than the number that
is in cell A100 (891 in this example). Then, hardcode the data in A101:A892
and Copy/Paste Special - Values to hardcode the data.

Then sort both columns using Column A as the key. Then delete the numbers
in Column A.




"Ernie" wrote:

I have about 100 rows of information and I need to insert 8 blank rows in
between each of the 100 rows - does any one know how to to this automatically?