Adding rows and embedded formulas depending on user input

Same rules apply pretty much... but you've still not said what you want to go into your newly inserted rows in terms of formulae etc... so what's inserted below is merely an example to show how you can add them... in this case you should find A80:C80 contain 1 and A78:C79 contain 0

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) <> "A5" Then Exit Sub
If Len(Target.Value) > 0 Then
   Rows("78:80").Insert
   With Range("A78:C80")
       .Formula = "=IF(ROW()>79,1,0)"
       .Font.Bold = True
   End With
End If
End Sub

haitham1984 --- we're getting there... to avoid confusion let's assume the following... user has entered text into A5 and now we have three brand new rows of data, namely rows 78, 79 & 80.

Now what exactly goes in each cell... please be as specific as possible...

ie you say one column will say C80=A5 -- where does this formula go ? (obviously not in C80!)

On a slightly different note -- if we were to look at the contents of row 77 ie the last row of data prior to our newly inserted rows would the formulae going into rows 78:80 be exact copies of the formulae in row 77 (give or take the odd relative cell reference) ?