Hi folks:

this is the scenario: I have a spreadsheet organized by employe
number and pay types (Reg pay, Overtime, Bonus, Misc). Sme employee
have 1 pay type, some have two, some 3 and some 4. I need to add row
to those employees that have less than 4 pay types to make it 4. Al
employees should have 4 rows.

this is what I've been working with:

Do
If ActiveCell = ActiveCell.Offset(1, 0) Then
ActiveCell.Offset(1, 0).Select
Else
ActiveCell.Offset(1, 0).Select
Selection.EntireRow.Insert
End If
Loop Until ActiveCell = ""

thanks for the help:confused

--
Message posted from http://www.ExcelForum.com