Hi
You could put a change event macro on sheet 2. Right click on the sheet2 tab, select view code and enter
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column <= 5 Then
lastrow = Sheets("sheet2").Range("a65536").End(xlUp).Row
Sheets("sheet3").Range("a1:e" & lastrow) = Sheets("sheet2").Range("a1:e" & lastrow).Value
End If
End Sub
There are a couple of assumptions in this.
1) The last row in sheet2 will cover any previous data in sheet3
2) Column A will always have data going to the last row.
If you are likely to have data in sheet3 that will be longer than existing data in sheet2, then it may pay to do a test of the last rows in both sheets, and take whichever is the larger value.
Tony