Setting a date field trigger by another cell

[Angus McBagpipe]

I have a field G9 that I set by picking from a predetermined validation list.
When I set that status in G9 I'd like the date in E9 to be set to todays date. This is my interaction date.

How do I go about using VB to accomplish this?
I have used VB in the past but not very much. New job new challenges.

Any help would be greatly appreciated.

Angus,

 

[AFPathfinder]

I don't think you have to use VBA for this solution unless you want to. I guess if E9 needs to be a static date instead of:

=IF(G9="","",TODAY())

VBA would be like this:

If Range("G9").Value <> "" Then
    Range("E9").Value = Date
End If

 

[Angus McBagpipe]

Not sure that's how I need it to work.
More like ....
If the status in G9 is changed set E9 to today's date.

 

[AFPathfinder]

So, a worksheet event on change. If the address of the cell that was changed is G9, then put today's date in E9:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "G9" Then
        Range("E9").Value = Date
    End If
End Sub

 

[Joe4]

AFPathfinder, there is a minor issue with this line of code:

    If Target.Address = "G9" Then

That will not work as written.

It needs to be either:

    If Target.Address = "$G$9" Then

or

    If Target.Address(0,0) = "G9" Then

 

[AFPathfinder]

Ah, thanks for the correction, Joe4! Updated solution:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$G$9" Then
        Range("E9").Value = Date
    End If
End Sub