Macro edit to add before contents to the new row

[expert40]

Hi ,
I have the follwing excel sheet which i have attached.And i have macro
in the sheet.

When i run the macro in the Working sheet it will do the allocation.

When a person is alloted in two projects new empty row was inserted wit
project and allocation..

Now i want the previous row data .

For Ex:

Take the example of Ramana before running macro

Ramana V Programmer Offshore India Café Fixed Run Ram 200 $5,138.00


After running macro the data looks like


Ramana V Programmer Offshore India Café Fixed Run Ram 200 $5,138.0
$0.00 Project1 767.4
Project2 3003.75
Project3 1366.85


But i want the data look like


Ramana V Programmer Offshore India Café Fixed Run Ram 200 $5,138.0
$0.00 Project1 767.4
Ramana V Programmer Offshore India Café Fixe
Run Ram Project2 3003.75
Ramana V Programmer Offshore India Café Fixe
Run Ram Project3 1366.85



please try to help me or direct m

+-------------------------------------------------------------------
|Filename: Working on final11.zip
|Download: http://www.excelbanter.com/attachment.php?attachmentid=305
+-------------------------------------------------------------------

 

[Auric__]

I have the follwing excel sheet which i have attached.And i have macros
in the sheet.

When i run the macro in the Working sheet it will do the allocation.

When a person is alloted in two projects new empty row was inserted with
project and allocation..

Now i want the previous row data .

For Ex:

Take the example of Ramana before running macro [snip]
After running macro the data looks like [snip]
But i want the data look like

[snip]

At the end of the macro, copy the data down. Something as simple as this
right at the end of the macro works:
For n = 16 To Cells.SpecialCells(xlCellTypeLastCell).Row
If Cells(n, 1).Value = "" Then Range("A" & n & ":H" & n).FillDown
Next n