right click sheet tabview codeinsert thisSAVE. Now when you put a number
in col B above Total in col A the row will be inserted and your cursor will
goto col A on the inserted row.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Then Exit Sub
If Cells(Target.Row, 2).Offset(1, -1) = "Total" Then
Rows(Target.Row + 1).Insert
Cells(Target.Row + 1, 1).Select
End If
End Sub


--
Don Guillett
SalesAid Software

"Capsaisin" wrote in message
...
HI

I am creating a workbook that has a column for the name of the bill, a
colum
for the ammount of the bill, and at the bottom of the ammount colum, a
total.

I would like it to be so that every time i fill in the last row before the
total, a new row is generated so that i dont have to keep doing it
manually.

for example:

electric 10
phone 21
cell 13
44
becomes

electric 10
phone 21
cell 13

44



Thank you