With VBA

ActiveCell.Offset(1, 0).Resize(ActiveCell.Value).EntireRow.Insert


--
HTH

Bob Phillips

"Floyd Elkins" <Floyd wrote in message
...
I need to be able to insert a number into a column in an Excel Spreadsheet
and have that number of rows (copied from another row) entered following
that
row.