okay, not sure how your inputing information on this one, but for sheet one, right click your sheet name and insert this code in the right frame:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Not IsEmpty(Target) Then
Target.Offset(0, 3).Value = Format$(Date, "mm/dd/yyyy")
End If
End Sub
that will give you a static current date of when the information was put into column A (on the corresponding row in column D)
Questions on sheet 2:
the cells C2, F2 & L9, what information do you want in there? you have the same setup on sheet 3 also, in the cells A2, C2 & D11. is this information coming from sheet 1?? sheet 2?? to be filled in after everything else is?
not sure if this will work for sheet 2, but:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not IsEmpty(Range("C7")) Then
Range("C2").Value = Format$(Date, "mm/dd/yyyy")
Range("F2").Value = Range("C7").Value
Range("L9").Formula = "=SUM($L$7:$L8)"
End If
End Sub
not sure if i've got this right or not..