Hi all,

I need some help

When I enter the value "In Process" into column Q, I need column R to populate with the date. And similarly, when the value "Complete" is entered into column Q, I need column S to populate with the date.

I basically am trying to keep track of how long things in my list are marked 'in process'.

I found this for entering the date when ANY value is entered, but I am not familiar with VB enough to make it work how I want.

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Cells.Count > 1 Then Exit Sub

If Not Intersect(Target, Range("Q2:Q1000")) Is Nothing Then

With Target(1, 2)

.Value = Date

.EntireColumn.AutoFit

End With

End If

End Sub


Any advice is greatly appreciated!
Emily