insert date that cell is modified


Posted by Thomas McGrath III on January 24, 2001 8:28 AM

I have two columns of paid amount and date paid:
A B
1 $20.00 1/18/01
2 $0.00
3 $10.00 1/14/01

I would like the date inserted and or changed in column B if and when the amount in column A is changed or modified.

Any help would be greatly appreciated.



Posted by Greg on January 24, 2001 3:54 PM

response:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
Intcolumn = Target.Column
introw = Target.Row
Cells(introw, Intcolumn + 1) = Now()

End If

End Sub

The target column is the column that you would have the price in.
Hope that helps